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Foreword 


So, you feel you've had enough of BASIC and want to learn more 
about your machine. 

Maybe you use your computer to run some professionally written 
software, like word processing, accounting systems, educational 

You may have wondered what it is that makes these programs so 
different from the ones you have written in BASIC. These 
professional programs seem to be able to do many tasks at the 
same time, including functions which you may have not realised 
that your computer can do. 

Apart from the size of the programs and the amount of time 
spent in writing them, the one major difference between your 
programs and most of the programs that you will buy in a store, 
is that most professional programs are written wholly or partly 
in machine language. 

Machine language is a must for the really serious programmer. 
Most games, useful utilities and interfaces are written in 
machine language. 

This book attempts to give you an introduction to the world of 
machine language, the other side of your 130XE. 

You will be led through the microprocessor's instruction set 
slowly at first, practising each instuction learned using the 
monitor/program entry program ALPA (Assembly Language 
Programming Aid). 

As we work through the instruction set you will meet the new 
concepts and features of your computer, some of which you may 
not have known it possessed. 

You are encouraged throughout the book to check that the 
computer's output is what you would logically expect it to be. 
Keep a pen and paper close at hand to copy on paper what the 
microprocessor is doing, to get its answers, and to see if your 


agree. 




Chapter 1 

Introduction to Machine Language 


One advantage of machine language (M.L.) is that it allows the 
programmer to perform several functions not suited to BASIC. 
The most remarkable advantage of machine language, however, is 
its speed. On the 130XE you can carry out approximately one 
hundred thousand M.L instructions per second. BASIC commands 
are several hundred times slower. 

This is due to the fact that BASIC is written in machine 
language and one single BASIC command may be a machine language 
program of hundreds of instructions. This is reflected in the 
capabilities of each of the languages. 

Machine language instructions, as you will see as you work your 
way through this book, are extremely limited in what they can 
do. They perform only minute tasks and it takes many of them 
to achieve any 'useful' function. They perform tasks related 
to the actual machinery of the computer. They tell the 
computer to remember some numbers and forget others, to see if 
a key on the keyboard is pressed, to read and write data to the 
cassette tape and to print a character on the screen. 

Machine language programs can be thought of as subroutines - 
like a subroutine in BASIC - a program within another program 
that can be used anywhere in the program and returns to where 
it was called from when finished. You use the commands GOSUB 
and RETURN to execute and then return from a subroutine. 


10 GOSUB 8000 


8000 RETURN 
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This wouldn't be a very useful subroutine because it doesn't do 
anything but it does show how a subroutine works! 

Using a machine language program 

To call a machine language subroutine from a BASIC program you 
use the command 'A=USR (address)' where A is a dummy variable. 
Just as with the GOSUB command you must tell the computer where 
your routine starts. 'GOSUB 8000' calls the subroutine at line 
number 8000. Similarly A=USR (8000) calls the machine language 
subroutine at memory address 8000. 

NOTE here that memory address 8000 is very different to line 
number 8000. A memory address is not a program line number, it 
is the 'address' of an actual piece of memory in the computer. 

Memory addressing 

Each piece of memory in the computer can be visualised as a box 

With over 65,000 separate boxes, the computer must have a 
filing system to keep track of them, so that it can find each 
separate piece of information when it needs it. The filing 
system it uses gives each box an 'address', which is like the 
address of your house. You use addresses to find the one 
particular house you are looking for anywhere within a busy 
city. You use this address to visit a house, send it mail or 
to pick up a parcel from it. The computer, like us, sends 
information and moves from one place (subroutine) to another 
using its system of addresses. 

The computer's system of addressing is simpler than ours - in 
its terms, anyway - as it starts at one end of memory and calls 
this address zero. It then counts through the memory 'boxes', 
giving each of them a number as it goes - from zero at one end 
to 65535 right at the other end of memory. For us this would 
be very difficult to remember, but for the computer it is the 
logical way to do things. These numbered boxes can be thought 
of as post office boxes. If you put something in the box at 
address number one, it will stay there until you replace it 
with something else. 

Each box can hold only one thing at a time. When you put 
something in a box, what was originally there will be lost 
forever. 

The command 'A=USR (8000)' tells the BASIC to execute a machine 
language subroutine whose first instruction is stored in the 
box at address 8000. 
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Using memory directly from BASIC 

There are two other BASIC commands that you will find extremely 
useful in this work. 

They enable us to put things in and collect things from the 
boxes in memory. These commands are 'PEEK' AND 'POKE'. PRINT 
PEEK (500) picks up the contents of the box at memory address 
500 and prints it. This can be used like any other function 
within a BASIC program, e.g. A = PEEK (387) or C = 7*PEEK 
1078)+14. 

POKE 1100,27 puts the number after the comma, in this case 27, 
into the box at memory address 1100, e.g. POKE 2179,B or POKE 
C,X. Try the following: 

PRINT PEEK (8000) 

POKE 8000,200 
PRINT PEEK (8000) 

We will be using these BASIC commands a lot while experimenting 
with machine language instructions so that we can find out the 
result of the programs we write and use. BASIC will be a tool 
by which we write, run and observe our machine language 
programs. 

Machine language as a subroutine 

We have said that our machine language programs will be used 
like a subroutine in BASIC. In place of the 'GOSUB' we will 
use the 'USR' command. 

In BASIC, as you know, a subroutine must end with the command 
RETURN. 



8040 RETURN 
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So too our machine language routines must end with a command to 
RETURN to the main program but it will not be a BASIC command 
it will be a machine language instruction. 

The machine language instruction for RETURN is 96. That's it, 
just 96. 96 is what the microprocessor understands as a 
command to RETURN from a subroutine. It would of course be 
impossible for us to remember that 96 is return as well as the 
list of hundreds of other instructions, so we have names for 
each instruction. These names are meaningless to the computer 
but, hopefully make some sense to us, the programmers. These 
names are short simple and to the point, they are called 
Mnemonics. 

One important note here, the USR command allows the user to 
pass to a machine language program information through 
parameters. For our purposes we will be passing no parameters. 
However the 130XE always assumes that you are passing at least 
one parameter and saves the number of parameters in a place 
called the stack. In our case the number will be zero. This 
number must be removed from the stack before your machine 
language program tries to return to BASIC or it will crash the 
machine. To do this put at the start of your program a PLA, 
it is 104 in decimal. If this is impractical then 
alternatively this instruction can be the second last 
instruction executed (before the RTS). It is simplest however 
to make it the first. 

The mnemonic for 96 is RTS. RTS stands for RETURN from 
Subroutine. The mnemonic for 104 is PLA which stands for Pull 
accumulator. Where necessary throughout we will provide both 
the machine code numbers and the mnemonics of an instruction, 
as this makes it readable to you while at the same time 
providing the information needed for the computer. 

To demonstrate how this works we will create a very short 
machine language program. Type in the following BASIC lines: 

POKE 8192,104 
POKE 8193,96 

This puts 104 (the value of PLA instruction) into the memory 
address of location 8192 and 96 (the value of the RTS 
instruction) into the box at memory address of location 8193. 

Congratulations! You have just created your first machine 
language program. It doesn't do much; it is just like the 
empty BASIC subroutine: 
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10 GOSUB 8000 
8000 RETURN 


Sitting in the box at memory address 8193 is the instruction 96 
(RTS). We will now run (just to check that it works) our 
program using the command 'USR 1 . Type in the following BASIC 


A=USR (8192) 


The computer should respond with READY. It has just executed 
your program. 


Chapter 1 SUMMARY 

1. Assembly code is fast. It allows access to the computer's 
inbuilt hardware functions that are not convenient to use from 
BASIC. 

2. Instructions only perform very simple tasks and so it 
requires a large number of them to do anything complicated. 
However each instruction executes very quickly 

3. Memory is addressed using numbers from 0 to 65535. 

4. A memory address can be thought of as a post office box, 
which can only hold one piece of information at a time. 

5. PEEK is used to examine the contents of a memory location 
from BASIC. 

6. POKE is used to put a number into a memory location from 
BASIC. 

7. USR is used to run a machine language from BASIC. 

8. A machine language program called from BASIC must include 
at least one PLA as the first executable instruction or the 
second last executable instruction. Please note the difference 
between the first instruction in a program and the first 
instruction which is actually executed. They are not the same 
thing. 

9. The value 96 (RTS) must be placed at the end of every 
machine language program to tell the computer to 'RETURN' from 
subroutine. 
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Chapter 2 

Basics of Machine Language 
Programming 


Using memory from machine 
language 

So far we have discussed memory, discussed how you can look at 
things in memory from BASIC, and how to put things in memory 
from BASIC. 

This of course has to be done within our machine language 
programs as well. We need to be able to pick up some 
information from one of the boxes in memory, perform operations 
on it and then return it to the same, or to a different, box in 
memory. To do this, the microprocessor has devices called 
registers. These can be thought of as hands which the 

The registers 

There are three of these hands (registers) called A,X and Y, 
each of which is suited to a particular range of tasks in the 
same way that a right handed person uses their right hand to 
play tennis, their left hand to throw the ball in the air and 
to serve, and when needed both hands, e.g. to tie their shoes. 

These hands (registers) can pick up information from the memory 
boxes. Like memory they can only hold one piece of information 
at a time, but they are not themselves a part of the memory as 
they have no address. They are an actual part of the 
microprocessor and there are special machine language 
instructions which deal with each of them seperately. 

The accumulator 

The first register we will talk about is the 'A' register (or 
accumulator). As you will see in the following chapters, the 
accumulator's functions are the most general of the computer's 
hands. It is also the register which handles most of the 
microprocessor's mathematical functions. 
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In most cases, the microprocessor must be holding some 
information in one of its hands (registers) before it can do 
anything with it. To get the microprocessor to pick up 

something from one of the boxes in memory, using the 
accumulator, you use the instruction 'LDA'. This mnemonic 
stands for load accumulator. This loads the contents of one of 
the boxes in memory into the microprocessor's accumulator hand, 
e-g- 


LDA 253 

This command takes the contents of the box at memory address 
253 and puts it in the microprocessor's 'A 1 hand 
(accumulator). The machine code values of this instruction is 
165 253. 


NOTE here that the machine code is in two parts. Unlike the 
command RTS which is in one part, - 96 -, the LDA 253 has one 
part for the command LDA, - 165 -, and one part for the address 
of the box in memory which contains the information being 
picked up, - 253 -. These two parts of the instruction are put 
in seperate memory boxes so the boxes containing the program; 
|LDA 38 I 

Irts I 

Would look like: 


1651 

ESH 

m 


Addressing modes 


Most machine language instructions have several different forms 
or modes, which allow the programmer flexibility in how and 
where in memory the data will be put for the program to operate 
on. There are eight different forms for LDA alone, called 
Addressing Modes. 

In various different ways, these addressing modes alter the way 
in which the address of the box in . memory to be used is 
specified within the instruction. 

For example, assume you had an instruction to take a letter out 
of a certain post office box. Your instructions could tell you 
to do this in several different ways: 
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1. You could be told to look for box number 17. 

2. You could be told to look for the box third from the right 

on the second bottom row. 

3. You could be told to look for the box owned by Mr. Smith. 

4. You could be told to look for the box whose address was 

contained in a different box. 

5. You could be simply handed the letter. 


You will find out more about addressing modes later in the 
book, but for now you will be introduced to three of tl>e eight 
different forms of the LDA command. 


Mode 1 - 165 253 LDA 253 

This is a short form of the LDA. For reasons which will be 
explained later, it can only access memory over a short range 
of possible addresses. 

Mode 2 - 173 55 4 LDA 1079 

This is a longer form of the LDA command; it can access a box 
anywhere in memory. NOTE here that the machine code is in 
three parts. The first part - 173 - is the command for LDA in 
this three part form. The - 55 - and the - 4 - represent the 
address of the box 1079 which contains the data to be put in 
the A hand. The reasons for this apparently strange number 
which makes 1079 into 55,4 will become clear in the following 
chapter, for now accept it is so. This mode is called absolute 
addresing. 


Mode 3 - 169 71 LDA #71 

This command is different from the previous two. Instead of 
looking for the information to be put into the accumulator in 
one of the boxes in memory, the information you want is given 
to you as part of the instruction. In this case the number 71 
will be put into the accumulator. It has nothing to do at all 
with the box at address number 71. Note here that this 
different type of addressing known as 'immediate' addressing is 
shown in the mnemonic by a '#' symbol before the number. 

We know how to get the microprocessor to pick something up from 
memory, but before we can do anything useful we have to know 
how to get the microprocessor to do something with it. To get 
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the microprocessor to place the contents of its A hand 
(accumulator) in memory, we use the instruction STA which 
stands for Store accumulator in a specified box in memory. 

This instruction too has several addressing modes (seven in 
fact) but only two of them will be discussed here. 


Mode 1 - 133 41 STA 41 

This instruction puts the contents of the accumulator in the 
box at address 41. As in the LDA, the similar instruction in 
two parts (zero page mode) can only reach a limited number of 
addresses in memory boxes. 

Mode 2 - 141 57 03 STA 825 

This is like Mode 1 except that it can put the contents of the 
accumulator in a box anywhere in memory (absolute addressing). 
The - 141 - specifies the instruction and the - 57 - and - 3 - 
contain the address of box 825 (this is explained in Chapter 
3). 

QUESTION: Why is there no 'STA' immediate mode (see LDA #71)? 

ANSWER: The 'immediate' mode in 'LDA #71' puts the number in 
the instruction - 71 - into the accumulator, somewhat like 
being handed a letter, not just a post office box number of 
where to find the letter. STA immediate mode would attempt to 
put the contents of the accumulator in the STA instruction 
itself. This is like being told to put a letter not into a 
post office box but into the instructions you have been given. 
Obviously this has no practical meaning! 


Simple program input 

We will now write a few machine language programs to examine 
the instructions we have learned so far. To make it easier 
enter the following BASIC program: 

5 PRINT CHR$(125);"-" 

10 REM THIS PROGRAM WILL MAKE IT EASIER TO ENTER MACHINE CODE 
PROGRAMS 
20 READ A 

30 IF A=—1 THEN GOTO 70 
40 POKE 1536+X.A 
50 X=X+1 
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60 GOTO 20 

70 PRINT "BEFORE.. -LOCATION 40000 ";PEEK (40000) 

80 Q=USR(1536) 

90 PRINT "AFTER_LOCATION 40000 ";PEEK(40000) 

100 END 
1000 DATA 104 
1010 DATA 169,33 
1020 DATA 141,64,156 
1030 DATA 96 
9999 DATA -1 

LINES 1000 - 1030 contain our machine language program. 

LINES 20 - 60 puts our program from data statements into memory 
boxes starting from 1536 so it can be executed. 

LINES 70 - 90 print 'BEFORE' and 'AFTER' tests on the memory we 
are getting our machine language program to change. 

When the BASIC program is finished, our machine language 
program will be contained in memory boxes as follows: 


Address Data 

1536 104 

1537 169 

1538 33 

1539 141 

1540 64 

1541 156 

1542 96 


For the programmer's benifit this is written out in mnemonic 
form as follows: 

1536 PLA 

1537 LDA #33 

1539 STA 40000 

1542 RTS 


Assembly language 

A program written out in mnemonic form is called an 'assembly 
language' program, because to transform this list of letters 
which can be understood by the programmer into a list of 
numbers which can be understood by the microprocessor, you use 
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a program called an 'assembler'. Throughout this book 
you programs in mnemonic form e.g. RTS: 


mnemonics 


1536 

1537 
1539 
1542 


PLA 

LDA #33 
STA 40000 
RTS 


give 


Our BASIC program, as well as placing our machine code in 
memory, runs our program (see line 80). 

You will see by our before and after analysis of memory address 
40000 that it has been changed by our program as we intended. 
The original value of location 40000 could have been anything. 
The number you see may change each time you run the program. 
It is impossible to know what will be in memory before you put 
something in there yourself, just as you can't tell what might 
be left over in a post office box you haven't looked in before. 
The value in memory address 40000 after the program has been 
run is: 33. This shows that your program did what was expected 
it loaded the number 33 and then stored it into memory at 
40000. 


Screen memory 

There is one result from this program which you may not have 
expected. Look at the top left hand corner of the screen. You 
will see it contains an 'A'. Line 5 of the program clears the 
screen, and nowhere in the BASIC program was the 'A' printed on 
the screen, therefore it must have been put there by the 
machine language program. We know the machine language program 
puts the value 33 into location 40000. Could this print an 'A' 
on the screen? Try if from BASIC and see what happens. First 
clear the screen in the normal way and the type: 


POKE 40000,33 


You will see that the 'A' has reappeared on the top left hand 
corner of the screen. This has happened because memory at 
40000 has a dual purpose. It is used to display things on the 
screen, as well as carrying out the remembering functions of 
normal memory. The post office box description is still valid, 
but now the boxes seem to have glass fronts so that you can see 
on your screen what the boxes have inside them. If you look at 
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the table of screen display codes in Appendix 14, you will see 
that for the value 33 that we placed in location 40000 the 
character should be displayed is an 'A 1 . 

Let's try to display some of the other characters in the table 
on the screen. Let's try to print an 'X' on the screen. First 
we need to look up the table of screen display codes to find 
the value corresponding to the letter 'X'. You will find that 
this value is 56. To put this in memory at address 40000 we 
will use the program we wrote earlier: 


PLA 

LDA #33 


RTS 


But this time we will change LDA #33 to an LDA #56. Using the 
same BASIC program to put this into memory, we must now change 
line 1010 which holds the data for the LDA command. This must 
now read: 


1010 DATA 169,56:REM LDA #56 


Our machine language program will now (when the BASIC program 
is run) read: 


1536 104 PLA 

1537 169 56 LDA #56 

1539 141 64 156 STA 40000 

1542 96 RTS 


When this is run you will now see an 'X' appear in the top left 
hand corner of your screen. 

At this stage you might well ask, how do I print something 
somewhere else on the screen? The answer is simple. 'Screen 
Memory' (these 'glassfronted' boxes) lives from 40000 all the 
way through to 40959. It is set up in 24 rows of 40 columns as 
you see on your screen. Memory at 40000 appears at the top 
left corner; 40001 appears next to that to the right, and 40002 
next to that. Similarly 40000 + 40, 40040 appears immediately 
under 40000 at the left edge at the second top row and 40040 + 

40 (40080) under that, and so on. 

Using the same BASIC routine to enter our program, we will now 
try to print on the row second from the top of the screen. The 
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address of this place on the screen is given by 40000 + 40 

(screen base + 1 row) = 40040. 

Therefore we want our program to be: 


clear the stack of parameter information 
Character 'X' 

First column second row 


To do this we change the data we change the data for our 
program on line 1020 to read: 


1020 DATA 141,104,156:REM STA 40040 

You will also need to alter lines 70 and 90 from 40000 to 40040 
before running. The machine language program will now print an 
'X' on the second line from the top of the screen. 


Printing a message 

We will now use our BASIC program to write a bigger machine 
language program which will display a message on the screen. 
Type the following lines: 


1000 DATA 104 
1010 DATA 169,40 
1020 DATA 141,64,156 
1030 DATA 169,37 
1040 DATA 141,65,156 
1050 DATA 169,44 
1060 DATA 141,66,156 
1070 DATA 141,67,156 
1080 DATA 169,47 
1090 DATA 141,68,156 
1100 DATA 96 


Now run the program. You will see that it has printed 'HELLO' 
at the top of the screen. The machine language program we 
wrote to do this was: 


PLA 

LDA #56 
STA 40040 
RTS 
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Address MACHINE CODE 

1536 104 

1537 169 40 

1539 141 64 156 

1542 169 37 

1544 141 65 156 

1547 169 44 

1549 141 66 156 

1552 141 67 156 

1555 169 47 

1557 141 68 156 

1560 96 


ASSEMBLY CODE 

PLA SET UP STACK 

LDA #40 SCREEN CODE FOR 'H’ 

STA 40000 

LDA #37 SCREEN CODE FOR ’E' 
STA 40001 

LDA #44 SCREEN CODE FOR 'L' 
STA 40002 
STA 40003 

LDA #47 SCREEN CODE FOR 'O' 

STA 40004 

RTS 


Check the values used with those given in the table of screen 
display codes. 


It is interesting to note the way in which the two L's were 
printed. There was no need to put the value 44 back into the 
accumulator after it had been stored in memory once. When you 
take something from memory, or when when you put something from 
one of the registers (hands) into memory, a copy is taken and 
the original remains where it started. 


We can write the same programs we have just written using 
different addressing modes. It is useful to be able to write 
the same program in different ways for reasons of program 
efficiency. Sometimes you want a program to be as fast as 
possible, sometimes as short as possible, and at other times 
you may want it to be understandable and easily debugged. 

We will change the program to give us greater flexibility in 
what we print. Type in the following lines: 


15 PRINT "LETTER VALUE"INPUT B:POKE 203,B 


1010 DATA 165,203 
1100 DATA 169,55 
1110 DATA 141,69,156 
1120 DATA 96 


REM LDA 203 
REM LDA #55 
REM STA 40005 
REM RTS 


Our machine language program will now look like this: 


Address 

1536 

1537 
1539 
1542 
1544 


MACHINE CODE 
104 

165 203 

141 64 156 

169 37 

141 65 156 


ASSEMBLY CODE 
PLA 

LDA 203 
STA 40000 
LDA #37 
STA 40001 
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1547 169 
1549 141 
1552 141 
1555 169 
1557 141 
1560 169 
1562 141 
1565 96 


44 LDA #44 

66 156 STA 40002 

67 156 STA 40003 

47 LDA #47 

68 156 STA 40004 

55 LDA #55 

69 156 STA 40005 

RTS 


NOTE that this finds its first letter from the box at memory 
address 203 using zero page addressing instead of immediate 
addressing. Line 15 of our BASIC program sets this box in 
memory to be any number we choose. Run this program several 
times choosing the values, 57,34 and 45. 


We have seen in this chapter how memory can have more than one 
function by the example of the memory between 40000 and 40959, 
which doubles as screen memory. Similarly other parts of 
memory can have special functions. Different areas of memory 
are used to control screen colours, graphics, Player Missile 
graphics, sound, the keyboard, games controllers (joysticks) 
and many other I/O (Input/Output) functions. These areas will 
be referred to throughout the book on a purely introductory 
level. We encourage you to find more detailed descriptions 
from more advanced texts. 


Chapter 2 SUMMARY 


1. The microprocessor uses registers (like hands) to move data 
about and work on memory. 

2. It has three general purpose hands; the accumulator, the X 
register and the Y register. 

3. We use the LDA command to get the microprocessor to pick 
something up in the accumulator (A hand). 

4. We use the STA command to get the microprocessor to put the 
contents of the accumulator in to a specified location. 

5. These commands and many others have several different 
addressing modes which allow us flexibility in the way we store 
and use our data: 

* immediate addressing holds the data within the 

* absolute addressing uses data stored anywhere in memory. 

* zero page addressing uses data stored within a limited 
area of memory. 
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is called 


6. A program written out in mnemonic form 
assembly language program. 

7. Memory is used to display information on the screen. 

8. Information is displayed according to a screen display code 
which gives a numeric value to any printable character. 

9. Memory is used to control other I/O (Input/Output) 
functions of the computer. 
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Chapter 3 

Introduction to Hexadecimal 


Uses of hexadecimal 


So far in this book we have talked about memory in several 
different ways, but we have not been specific about what it can 
and cannot hold. We have used memory to hold numbers which 
represented characters, numeric values, machine code 
instructions and memory addresses. We have merely put a number 
in memory without thinking about how the computer stores it, in 
all but one case. 

It is the absolute addressing mode which has shown us that the 
computer's numbering system is not as simple as we might of 
first thought, e.g 141 64 156 is the machine code for STA 40000 
, leaving the numbers 64 and 156 signifying the address 40000 . 
There is obviously something going on which we have not 
accounted for. 

We have previously compared the microprocessor's registers and 
memory to hands. How big a number can you hold in your hand? 
Well that depends on what we mean by hold. You can use your 
fingers to count to five, so you can use one hand to hold a 
number from zero to five. Does that mean that the biggest 
number that you can hold is five? You may be surprised to hear 
that the answer is NO. 


Counting from 0 to 5 on your fingers like this 

v? <7 r? [? ft 

O i 7 , \ 5 

is very wasteful of the resources of your hand, just as 
counting like that on a computer would be very wasteful of its 
resources. 
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Binary 


i compute 


either l 


off) 




the same way a light can be 
fingers, it can tell which of 
off. In other words, the valui 
the number of fingers used but 
fingers. Try this yourself give each finger 
following values (mark it with a pen if you like). 


fingers is on and 
presented depends nc 


off, in 

t only on 
of those 
e of the 




Now try to count by adding the numbers represented by 
finger in the up (on) position: 


v? vr'u’f? 
0 1 


4 -hi 


: the following numbers 


7,16,10,21,29 


Q. What is the biggest number you can represent on your 
A. S l+2+4+8+16=31 


As you can see 31 is quite a significant improvement on 5. The 
computer's 'hands' are different from ours in several ways. 
Its fingers are electronic signals which can either be on or 
off, as opposed to our fingers being up or down. For the 
programmer's benefit the condition on is given the value 1 and 
the condition off is given the value 0. 

The other major difference is that the computer has eight 
'fingers' on each 'hand'. This may sound silly, but there is 
no reason for it not to be that way. As it turns out it is a 
fairly easy set up to handle. The computer's eight fingered 
hand is called a 'byte' of memory. As with our own fingers, we 
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of the following 


give each of the computer's 'fingers' one 
valuesr 



Again we count by adding together the values of all those 


'ingers in the 'o 

Eight fingered 

n' position. 

Computer’s ‘hand’ 

Number 

hand 

Vyy^) 

— byte 


|0|0|l|l|0|0|0|l| 

32+16+1 = 49 

11 |l |0|0|0|l |0|0| 

128+64+4 = 196 


| o|(Z)|0|l |0|0|0|l | 

16+1 = 17 


Q. What is the biggest number that can be represented by the 
computer's 'eight fingered hand'? 

A. 128+64+32+16+8+4+2+1=255 


Without realising it, what we have done in this chapter is 
introduce the binary numbering system (base two). All 
computers work in base two representing electrical on's and 
off's an endless stream of l's and 0's. This of course would 
make the programmer's task of controlling what is going on 
inside the computer even more confusing than it already is, 
e.g. : 


Assembly Code Machine code Binary 


LDA #33 
STA 40000 
RTS 


169 33 10101001 00100001 

141 64 156 10001101 01000000 10011100 

96 01100000 
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Why hexadecimal? 

This of course would be impossible for a programmer to 
remember, and difficult to type in correctly. We could of 
course just use decimal as listed in the machine code column. 
As it turns out, this is not the most convenient form to use. 
What we do use is hexadecimal or base sixteen. This may sound 
strange but it becomes very easy because it relates closely to 
the actual binary representation stored by the computer. 

To convert between binary and hexadecimal is easy. Each 
hexadecimal digit can store a digit between 0 and 15 (decimal) 
just as each decimal digit must be between 0 and 9. Therefore 
one hexadecimal digit represents one half of a byte (eight 
fingered hand). 


Binary Hexadecimal 



0- 15 0- 15 0- 15 0- 15 


The whole eight fingered hand can be shown by two hexadecimal 
digits. You might at this point be wondering how one digit can 
show a number between 0 and 15. Well it is exactly the same as 
decimal the numbers 10, 11, 12, 13, 14, 15 (decimal) are 
represented by the letters A, B, C, D, E, F respectively. 


BINARY DECIMAL HEXADECIMAL 


0000 0 0 

0001 1 1 

0010 2 2 

0011 3 3 

0100 4 4 

0101 5 5 

0110 6 6 

0111 7 7 

1000 8 8 

1001 9 9 

1010 10 A 

1011 11 B 

1100 12 C 

1101 13 D 

1110 14 E 

1111 15 F 

10000 16 10 
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This shows that converting from binary to hexadecimal is merely 
dividing into easy-to-see segments of four (fingers). 

Iiioiominni0l hh i i i ih i i lg j il I0I0I1I0I0I1I1I1I 

9 E F D 2 7 

Hex and Binary mathematically 

Mathematically any base, 10, 2, 16 or 179 follows a simple 

format. Each digit takes the value Ax (BASE) Position -1 

In other words in decimal 98617 is 
7x10"+ 1 x10‘ + 6x10 2 + 8x10 :1 + 9x10' =98617 

7x1 + 1x10 + 6x100+ 8x1000+ 9x10000 = 98617 
7 + 10 + 600 + 8000 + 90000 = 98617 


In binary 01011101 is 

1 x2" + 0x2' + 1 x2’+ 1 x2 :, + 1 x 2 1 + 0 x 2’ + 1 x2" + 0x2 7 = 93 
1x1+0x 2 + 1x4 + 1x8+1x16 +0x 32+1x64+ 0x128 = 93 
1+0 + 4 + 8 + 16 + 0 + 64 + 0 =93 


In hexadecimal A7C4E is 


14 x 16° + 4 x 16 1 + 12 x 16 2 + 7 x 16 n + 10 x 16' 

14 x 1 + 4 x 16 + 12 x 256 + 7 x 4096 + 10 x 65536 
14 + 64 + 3072 + 28672 + 655360 


= 687182 
= 687182 
= 687182 


Several points should be noted here. Firstly, any number which 
can be stored in one memory box, (a number from 0 to 255) can 
be stored in 8 binary digits (bits), or as we have been calling 
them till now 'fingers'. Any number from 0 to 255 can also fit 
in two hexadecimal digits (FF = 15 x 16 + 15 x 1 = 255). 

This, however, is where our problem with absolute addressing 
occurs. If we can't put a number bigger than 255 into memory, 
how do we specify an address which may be between 0 and 65535 
(64K)? The solution is to use two boxes, not added together 
but as part of the same number. When dealing with addresses we 
are dealing with 16 finger (16 bit) (2 byte) binary numbers. 
This is the same as saying four digit hexadecimal numbers. The 
largest number we can hold in a four digit hexadecimal number 
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FFFF 


= 15 x 1 + 15 x 16 + 15 x 256 + 15 x 4096 
= 15 + 240 + 3840 + 61440 
= 65535 = 64K 


which is large enough to address all of memory, e.g., the 2 
byte (16 bit) hex number 13A9 equals: 



(((1 x 16) +3) *256) + (10 x 16 + 9) 
= 4864+169 
= 5033 


For example, the two byte hex number 0405 

= 4 x 256 + 5 
= 1024 + 5 
= 1029 


Absolute addressing 

If you look back at the beginning of this chapter you will see 
that this is the problem associated with absolute addressing 
which we have been able to solve. One other thing to remember 
with absolute addressing is that the bytes of the address are 
always backwards, e.g., 


STA 40000 
141 64 156 


The most significant byte (high byte) - 156 is placed last, and 
the least significant byte (low byte) - 64 is placed first. 
NOTE that this is the reverse of normal storage, e.g., normally 
17 where 1 is the most significant digit (1 x 10) is stored 
first. The 7 (7 x 1) is the least significant and comes 
second. The bytes of an absolute address are always stored low 
byte, high byte. 

This chapter also explains zero page addressing. Two byte 
instructions leave only one byte to specify the address, e.g., 
LDA 38 - 165 38. We have said before that when using 1 byte we 
can only count from 0 to 255. Therefore zero page addressing 
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>f memory. 


block of 256 


can only address the first 256 bytes o 
bytes is called a 'page'. 


To specify the fact that we are using hexadecimal this book 
follows the standard practice of placing a $ sign before a 
hexadecimal number. 


LDA 40000 is the 
LDA 65535 is the 
LDA 0 is the 


LDA $9C40 
LDA $FFFF 
LDA $0 


From now on all machine code listings will also be shown in 
hexadecimal; 




1536 

1537 
1539 
1542 


68 PLA 

A9 21 LDA #$21 

8D 40 9C STA $9C40 

60 RTS 


irrespective of the format used in the assembly code, which 
will vary depending on the application. 


Converting hexadecimal to decimal 

We have provided a table in appendix 3 for quick hexadecimal to 
decimal conversions. To use this chart for single byte 
numbers, look up the vertical columns for the first hexadecimal 
(hex) digit and the horizontal rows for the second digit e.g.; 


$2A - 3rd row down 

11th column from left 
Printed there is LO HI 

42 10752 


Look at the number under LO (low byte). 42 is decimal for $2A 
hex. For 2 byte hex numbers divide into 2 single bytes. For 
the left byte (or high byte) look up under HI and add to the 
low byte e.g.; 


$7156 divide HI = $71 LO = $56 
HI - 71 - 8th row down 

2nd column left 
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LO HI 
113 28928 


LO - 56 - 6th row down 

7th column from left 


LO HI 

86 22016 


Add high and low 28928 + 86 = 29014 
$7156 = 29014 


NOTE: in all cases LO HI 

X Y 


Y = 256 * X 

The high byte is 256 times value of the same low byt< 


Chapter 3 SUMMARY 

1. In counting on a computer's 'fingers', position (which 
fingers), as well as the number of fingers, is important. 

2. Each of the computer's hands and each piece of memory has 
8 'fingers', and the biggest number they can hold in each is 
255 

3. An eight 'fingered' piece of memory is called a byte. 

4. Each finger has a value which depends on its position. 

The fingers are numbered from zero to seven and their possible 
values are 1,2,4,8,16,32,64 and 128. 

5. Hexadecimal (base sixteen) is the grouping together of 

binary. 1 Hex digit = 4 binary digits. Hex is easier to 

handle than binary or decimal. 

6. DECIMAL 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 

HEX 0123456789A B C D E F 10 11 12 

7. Zero page addressing can access the first 256 bytes, the 

maximum addressable by one byte. 
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8. Absolute addressing can access 65536 (64K) bytes of memory 
(all), which is the maximum addressable by 2 bytes. 

9. Absolute addresses are always stored low byte first then 
high byte, e.g., 8D 98 17 LDA $1798. 

10. Hexadecimal numbers are specified by prefixing them with a 
$ sign. 

11. Remember the quick conversion table for hex to decimal in 
Appendix 3. 
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Chapter 4 

Introduction to ALPA + 
Disassembler 

We have provided you with two BASIC programs to help you put 
your machine language programs into memory. The first program 
is called ALPA which is an acronym for 'Assembly Language 
Programming Aid'. A listing of this program appears in 
Appendix 11. We have also provided a disassembler program to 
examine the ROMs and your programs. A listing of this can be 
found in Appendix 11 as well. In Chapter 2 we used a small 
BASIC program to put our machine language programs into memory, 
but as you can imagine, it would very soon become a tiresome 
process if we had to use this method every time when we wanted 
to enter our programs. Throughout the rest of the book we have 
given all our examples of machine language programs in ALPA 
format. The features of ALPA are: 


1. Programs are stored as text and can be edited with commands 
like INSERT, DELETE and APPEND. Text is converted into machine 
language by giving the ASM command. This command assembles 
your program and put the resulting code into an array called 
MEM. Thus assembling your program will not crash the machine. 

2. The programs you write with the editor can be saved or 
loaded to disk or tape. So you can work on a program, save it 
to tape, go away and reload it later. 

3. To help in inserting, deleting and editing, each 
instruction is put on a seperate line with a line number which 
you can use to reference it. The linenumber is generated 
automatically by the line editor. 

4. The program can be listed using the LIST command and 
stopped with the CTRL and '1' keys. 

5. A line is divided into three fields. Field one contains 
the label, field two the operation code and field three the 
operand. Each of the fields are reached by pressing the TAB 
key - except in the case of field one, where the cursor is 
placed at the required position by the computer. After a line 
is typed and RETURN is pressed a new line number will appear 
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set the point in memory where progra 
it sets the program counter). A 
Eour digit hexadecimal number followi 
ill cause an illegal hexadecimal 
error. Only one ORG statement is permitted in a program. ORG 
also defines the execution address of a program for the RUN 
command. 


GQU - assigns a value to a label, 
i zero page value or absolute value t 


DFB -generates a byte of data from a hexadecimal value ($00 
- $FF) supplied and puts it in the program at the current 
program counter location. There can only be one hexadecimal 
byte per DFB instruction. 


DFW -generates a word of data from 
iplits it into two bytes and puts the 
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current program counter location and the next one. Its also 
automatically reverses the order of the bytes. Therefore if 
you give the assembler the value $FF11, then the bytes 
generated will not be put in memory in the order $FF and $11 
but $11 and $FF. 

e.g. DFW $FA90 


To get ALPA running 

A Listing of ALPA appears in Appendix 11. 

1. Type in the program exactly as it has been listed in 
Appendix IT. 

2. When you have finished typing it in, save ALPA immediately 
(for cassette save type: SAVE "C:ALPA" for disk save type: 
SAVE"D:ALPA") 

NOTE: 

1. If you have made an error while typing in a line then the 
ATARI will reject it and print an error message. The error 
message will be inserted in the actual program line, so it will 
be necessary to retype the entire line or use the cursor 
editing keys to remove it. 

2. Even though a line may be accepted when it was entered, it 
is still possible for it to contain errors. For example, the 
ATARI cannot tell if a variable name is wrong, because the 
names of variables are chosen by the programmer (e.g. VAR$="A" 
instead of VAS$="A" would not be detected as an error by the 
computer, but would result in an error report when the program 
was RUN). So if ALPA does not work, carefully compare what you 
have typed in with the ALPA listing in the book. 


Using ALPA 

All numbers used in ALPA are to be entered in hexadecimal. 
Zero page hex numbers are distinguished from absolute hex 
numbers by their length. Zero page numbers are expected to be 
two digits long and absolute numbers four digits long. 

When ALPA is first initialised it is, by default, in Command 
mode. An asterisk and cursor will appear and ALPA will be 
waiting for a command. To enter the text editor use the 
command 'APPEND 1 . This will put you in the editor at the next 
line number, this will be '1' if there is no text. At this 
stage you are ready to type in your program. The programs you 
will write will be in the following format: 
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linenumber Label Operation-Code Operand. (seperated 
into fields with the TAB key). 

- operation code is the mnemonic instruction of the 
command you want to type. Followed by the operand (e.g. 
address or data), as in the following: 


1 LABEL LDA #$05 


1 STA $9C40 

ALPA commands 

The following commands are available in ALPA: 


1. LIST 

This command will display a range of linenumbers. Type LIST 
and press RETURN. It will ask for the starting linenumber and 
the ending linenumber. 


2. ASM 

This command assembles your source program into an array and 
all references are resolved according to the value of the PC. 
NOTE you must ASM a program before you can RUN it. 


3. RUN 

This command executes your program in memory starting 
first address specified by the ORG statement. It does 
copying the machine code in the array MEM into memory 
calling the program with USR. The ASM command must 
prior to the RUN command. 


from the 
this by 
and then 
be used 


4. WATCH 

This command asks you which address you want to 
invokes the WATCH function. The contents of 
specified will be printed before and after the 
memory is executed by RUN. This is used to observe 
of a program on memory. 


'WATCH 1 and 
the address 
program in 
the results 


5. NWATCH 

This command turns off the WATCH feature. 


6. LOAD 

This command loads an ALPA program saved using the SAVE command 
in ALPA from cassette or disk. Type LOAD and press RETURN, a 
prompt will appear and you must enter the device to load the 
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program from and the filename. No quotes are necessary round 
the filename. 

7. SAVE 

This command saves the current ALPA program to cassette or disk 
for LOADing in the future to work on without having to type it 
in again. It works in the same fashion as LOAD. 

8. DELETE 

This command deletes a line from the program. Type DELETE and 
press RETURN, then input the linenumber you want deleted. 

9. INSERT 

This command allows you to insert lines into the text. Lines 
are inserted after the line number specified. The command 
takes the form: 

INSERT (Press RETURN) 

:linenumber (Press RETURN) 

Then enter the text as usual. This mode is exited by pressing 
RETURN at the start of a new line. 

10. QUIT 

This command exits ALPA and returns you to BASIC. It is 
possible to restart ALPA with GOTO 12. 

11. NEW 

Removes your program from the text buffer (Deletes all of the 


Memory usage in ALPA 

You will notice that we have, consistently throughout the book, 
used only a few areas of memory for our programs and our data. 
We have not done this because they are the only ones that will 
work, but because we tried to use memory that we are sure that 
nobody else (BASIC, the Operating Sytem and ALPA itself) will 
be using. 

The programs that run within the computer all the time, BASIC 
and the Operating System, use specific areas of memory to store 
their own data in. It is good programming practice to know and 
avoid these areas to ensure that your program does not stop the 
Operating Sytem or BASIC from functioning properly. (Remember 
ALPA is written in BASIC). By checking through the memory maps 
and memory usage charts provided in Appendices 6 and 8, you 
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will be able to find other areas to use, but throughout the 
book we have mainly used memory at: 

$0600 - $06FF 

$CB - $CF zero page 

The best areas to use in zero page memory, when it is very 
full, are areas set as aside as buffers etc. 

If a program written in machine code looks as if it is never 
going to stop, it may well not. One way to stop these programs 
is to press RESET. You will be put back into BASIC with the 
usual screen display. If this does not work then the machine 
is well and truly 'hung' and nothing short of switching off and 
on will reset the machine. 

To continue in ALPA with your program intact, type GOTO 12 
(unless you switched off). This is also the procedure to 
follow if you accidentally leave ALPA. If this does not work 
type RUN. This should get ALPA working again, but your program 
will be lost. 

We will now repeat some of the programs we used earlier, to 
demonstrate the use of ALPA, e.g., 


PLA 

LDA #$21 
STA $9C40 
RTS 


This is the program we used at the beginning of chapter 2. To 
use ALPA, testing location $9C40 (40000) before and after the 
program, type the instructions on the right hand side of the 
program above, e.g., 


ORG $0600 
PLA 

LDA #$21 
STA $9C40 
RTS 


The computer will print the next line number and wait for 
input. After you have typed in the program, assemble it with 
the ASM command. To watch the change in location $9C40 type: 
WATCH 

To which the computer will reply: 

(what address )? $9C40 
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Now execute the program with the RUN command and study the 
output before and after the program was executed. Type NEW to 
remove the program and try out some of the other programs in 
chapter 2 using ALPA. Remember that ALPA uses only hex numbers 
and that Chapter 2 uses decimal, so it will be necessary to 
convert from decimal to hex. 

Further use of ALPA will be discussed as it becomes relevant to 
the commands being discussed. 

There is a disassembler to accompany ALPA. It is listed in 
Appendix 11 along with the listing ALPA. After the 
disassembler has been successfully typed in and saved, it can 
be used to disassemble memory and examine various parts of the 
130XE. It can also be used to disassemble your programs. To 
do this the object code must be in an area that will not be 
overwritten by the disassembler, if this is so you can load and 
run the disassembler. The Disassembler supports the following 
commands. 


1. MEM 

This command asks you the question 'DISASSEMBLE FROM WHAT 
ADDRESS:?' It will then disassemble (produce assembly code) 
using the contents of memory from the address specified for one 
screen. Any key except E will produce another screen of 
disassembly. Press the E key to exit to normal command mode. 

2. DUM 

This command asks you the question 'DUMP MEMORY FROM WHAT 
ADDRESS:?' It will then produce a 'hex dump' of memory from 
that address as a series of hex bytes. 

3. EXI 

Using this command will exit the dissasembler and pass control 
back to BASIC. 

4. ASC 

Displays an area of memory in ASCII character format. 

5. CMD 

Displays a list of the disassemblers commands. 


Chapter 4 SUMMARY 

1. We will use ALPA to enter all of our machine language 
programs after this Chapter. 
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ALPA's commands 


folic 


APPEND 

LIST 

RUN 

WATCH 

NWATCH 

LOAD 

SAVE 

DELETE 

INSERT 

QUIT 

NEW 

Although we will list programs in the form: 
line ### Instructions in Assembly Language, you 
ly type the instructions and leave the rest up to ALPA. 


The Disassembler has the following commands: 


MEM 

DUM 

CMD 

EXI 

ASC 


36 



Chapter 5 

Microprocessor Equipment 


In the previous four chapters we have covered a lot of the 
groundwork needed to understand the intricacies of machine code 
programming. More of the basics will be introduced as we go 
along. We have covered enough at this stage to move on to such 
things as using machine language to do some arithmetic. 


Storing numbers 

We know from Chapter 3 that the largest number we can store in 
a single byte (memory location) is 255. We have also seen that 
for addresses bigger than 255 we could use 2 bytes to represent 
them in low byte/high byte format so that Address = low byte + 
256 x high byte. 

Surely then we could use the same method to represent any sort 
of number greater than 255 and less than 65536 (65535 = 255 + 
256 x 255), and in fact if necessary this can be taken even 
further to represent even higher numbers. 


Numb = 1st byte + 256 x 2nd byte + 65536 x 3rd byte + 


The carry flag 

Now, when we add two 1 byte numbers together it is possible 
that the result is going to be larger than 255. What then can 
we do with the result of the addition? If we put the result in 
one byte it could be no bigger than 255, so: 


207 + 194 = 401 mod 256 = 145 
but also 
58 + 87 = 145 
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Surely there is something wrong here. We must somehow be able 
to store the extra information lost when a result is larger 
than 255. There is provision for this within the 6502 
microprocessor in the form of a single bit (single finger) 
'flag' called the carry flag. The carry flag is 'set' (turned 
on) if a result is geater than 255, e.g., 


207 + 194 = 145; carry = 1 
58 +87 = 145; carry = 0 


NOTE: a single bit is large enough to cover all possible cases 


11111111 255 

+ 11111111 + 255 

1 11111110 + carry 254 + carry 


Therefore to add 2 byte numbers together, you add the low bytes 
first and store the result, and then and the high bytes 
including the carry bit from the addition of the low bytes, 
e.g. , 


30A7 + 2CC4 = 5D6B 


is done in the following manner: 


low bytes 

A7 
+ C4 

6B carry set 

high bytes 

30 
+ 2C 

5D 

Answer = 5D6B 
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Adding numbers 

To handle this, the machine language instruction to add two 1 
byte numbers together is ADC (add with carry). This adds the 
specified number (or memory) plus carry flag to the accumulator 
and leaves the result in the accumulator. 

The instruction automatically adds in the carry bit to its 
calculation. Therefore since the carry could be set before you 
put anything in it (like memory - see chapter 1), it is 

necessary to set the carry to zero before an addition if that 

addition does not want to add the carry of a previous 

calculation. To set the carry flag to zero we use the 

instruction CLC (Clear Carry Flag) before such ADC's. 

Type in the following program, using ALPA: 

NEW 
APPEND 

2 
3 


WATCH 

(watch address )? 03FD 

ASM 

RUN 


The program will print: 


'address 03FD before' =00 3 

'address 03FD after' = 08 +5 

8 


We will now change lines 3 and 5 to alter the sum we are 
performing. NEW the old program and replace it with: 

1 ORG $0600 

2 PLA 

3 LDA #$27 

4 CLC 

5 ADC #$F4 

6 STA $03FD 

7 RTS 


ORG $0600 
PLA 

LDA #$03 
CLC 

ADC #$05 
STA $03FD 
RTS 
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ASM and RUN the program and the computer will respond with: 


address 03FD before = 08 
address 03FD after = IB 

27 
+ F4 

carry is set 1 IB 

NOTE: we cannot tell the carry has been set from our results. 

We will now change the program again. This time we will 
deliberately set the carry using SEC (Set Carry Flag) command 
before doing our addition. Remove the last program with NEW 
and type the following lines: 

1 ORG $0600 

2 PLA 

3 LDA #$03 

4 SEC 

5 ADC #$05 

6 STA $03FD 

7 RTS 

ASM and RUN the program, and the computer will respond with: 
address 03FD before = IB 
address 03FD after = 09 

3 

+ 5 

+ 1 (carry bit) 

= 9 


Type in the following lines: 


ORG $0600 
PLA 

LDA #$27 
CLC 

ADC #$F4 
LDA #$03. 
ADC #$14 
STA $03FD 
RTS 


ASM and RUN the program. 


address 03FD before = 09 
address 03FD after = 18 
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The carry is set by the addition on line 5 and carries 
to the second addition on line 7, hence: 


Now change line 5 and repeat 


ORG $0600 
PLA 

LDA #$27 
CLC 

ADC #$20 
LDA #$03 
ADC #$14 
STA $03FD 
RTS 


address 03FD before = 18 
address 03FD after = 17 




27 

20 

47 


14 

0 (carry) 
17 


From these we see how the carry bit is carried along 
result of one addition to another. 

We will now use this to do an addition of 2 byte numbe 
the method we described previously. 


Two Byte addition 

Suppose we want to add the numbers 6C67 and 49B2. 

6C67 
+ 49B2 


through 


with the 

rs using 
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To do this we must separate the problem into two single byte 
additions: 


low bytes 67 high bytes 6C 
+ B2 +49 

carry + 1 

carry = 1 19 

B6 

Clear the previous program using the NEW command and then type 
the following: 


2 

3 

4 

5 

6 


9 

10 


ORG $0600 
PLA 

LDA #$67 
CLC 

ADC #$B2 
STA $03FD 
LDA #$6C 
ADC #$49 
STA $03FE 
RTS 


This will store the low byte of the result in 03FD and the high 
byte of the result in 03FE. To check our answer we will use 
the WATCH command on both bytes (by running twice). 

ASM and RUN the program 
address 03FD before = ?? 
address 03FD after = 19 


Now type: 

WATCH 

(watch address )? 03FE 
RUN 

address before = ?? 
address after = B6 


Now join the high byte and the low byte of the result to give 
the answer: 


6C67 
+ 49B2 

B619 
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This procedure can be extended to add numbers of any length of 
bytes. 


Subtracting numbers 

The microprocessor, as well as having an add command has a 
subtract command. Similar to the ADC command the SBC (Subtract 
with Carry) uses the carry flag in its calculations. Because 
of the way in which the microprocessor does the subtraction, 
the carry bit is inverted (1 becomes 0 and 0 becomes 1) in the 
calculation, therefore 


8 8 
-5 - 5 

- 1 - CARRY (CARRY = 1) 

= 2 =3 


Consequently, to do a subtraction without carry, the carry 
must be set to 1 before the SBC command is used. Remove 
previous program and type the following: 

1 ORG $0600 

2 PLA 

3 LDA #$08 

4 CLC 

5 SBC #$05 

6 STA $03FD 

7 RTS 


flag 

the 


WATCH 

(watch address )? 03FD 
ASM and RUN this program. 


You will see from the results that by clearing the carry 
instead of setting it has given us the wrong answer. We will 
now correct our mistake by setting the carry to 1 before the 
subtract. Replace the previous program with this one: 

1 ORG $0600 

2 PLA 

3 LDA #$08 

4 SEC 

5 SBC #$05 

6 STA $03FD 

7 RTS 

ASM and RUN 
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You will 


:hat we have the correct answer: 


8 8 

- 5 - 5 

(CARRY 0) - 1 - 0 (CARRY = 1) 

= 2 =3 

You may have wondered how the microprocessor handles 
subtractions where the result is less than zero. Try for 
example 8 - E = - 6. Change line 5 of the program, ASM and RUN 
it. 


2 

3 

4 

5 

6 


ORG $0600 
PLA 

LDA #$08 
SEC 

SBC #$0E 
STA $03FD 
RTS 


address 03FD before = ?? 
address 03FD after = FA 


8 or BORROW = 108 carry cleared to zero 
- E - E 

-6 FA 


NOTE: that 


- 6 
FA 


0 - 6 = FA 
6 = 0 


This clearing of the carry to signify a borrow can be 
multibyte subtraction in the same way as it can for 
addition. Try to write a program to do the 
subtraction: 


used for 
multibyte 
following 


$E615 - $7198 
Here is an example 


1 ORG $0600 

2 PLA 
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3 LDA #$15 

4 SEC 

5 SBC #$98 

6 STA $03FD 

7 LDA #$E6 

8 SBC #$71 

9 STA $03FE 

10 RTS 


ASM and RUN this, noting the results. Use WATCH to observe 
$3FE - the high byte of the result and RUN again. Combine the 
high and low bytes of the result to get the answer $747D. 

These instructions ADC and SBC can be used in many addressing 
modes, like most other instructions. In this chapter we have 
only used immediate addressing. 

NOTE: SEC and CLC have only one addressing mode - implied. 
They perform a set/reset on a specific bit of the status 
register and there are no alternative addressing modes. Their 
method of addressing is 'implied' within the instruction. 


An exercise 


Write a program to add the value $37 to the contents of memory 
location $03FD using ADC in the 'absolute' addressing mode, and 
put the result back there. Use WATCH to observe the results. 


NOTE here: 

LDA #$FF 
CLC 

ADC #$01 

leaves the value #$00 in A with the carry set, and 

LDA #$00 
SEC 

SBC #$01 

leaves the value #$FF in A with the carry clear (borrow). 


Therefore we have what is called 'wrap-around'. Counting up 
past 255 will start again from 0, and counting down past zero 
will count from 255 down. 
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Chapter 5 SUMMARY 


1. Any size number may be represented by using more than 1 
byte. Numb = 1st byte + 2nd byte x 256 + 3rd byte x 65536 + 


2. The 6502 microprocessor has a carry flag which is set to 
signify the carry of data into the high byte of a two byte 
addition. 

3. ADC adds two bytes plus the contents of the carry flag. A 
CLC should be used if the carry is irrelevant to the addition. 

4. ADC sets the carry flag if the result is greater than 255, 
and clears it if it is not. The answer left in the accumulator 
is always less than 256. (A = Result Mod 256). 

5. SBC subtracts memory from the accumulator and then 
subtracts the inverse of the carry flag. So as not to have the 
carry interfere with the calculations, a SEC should be used 
before SBC. 

6. SBC sets the carry flag if the result does not require a 

borrow (A - M > 0). The carry flag is cleared if (A - M < 0) 

and the result left in A is 256 - (A - M). 

CLEAR CARRY 

XX = ADD LOW BYTES + (CARRY = 0) 

YY = ADD HIGH BYTES + (CARRY = ?) 

Result is $YYXX 

8. Two byte subtraction: 

SET CARRY 

XX = SUBTRACT LOW BYTES - INVERSE (CARRY = 1) 

YY = SUBTRACT HIGH BYTES - INVERSE CARRY (CARRY = ?) 

Result is $YYXX 



Chapter 6 
Program Control 


Player-Missile Graphics 

Back in Chapter 2 we saw how we could display information on 
the screen by placing that data in 'screen memory'. There is a 
special 'chip' in the Atari 130XE which handles screen oriented 
tasks. It is called the Antic-chip. (A brief guide appears in 
Appendix 5). Using the techniques of addition and subtraction 
that we learned in the previous chapter, we will look at some 
of the following features available on the ANTIC chip. 

Type in the following program using ALPA: 


NEW 

NWATCH 

APPEND 

1 

2 


6 

7 

8 

9 

10 
11 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 


ORG $0600 
PLA 

LDA #$03 
STA $D01D 
LDA #$3E 
STA $022F 
LDA #$01 
STA $D008 
LDA #$32 
STA $D000 
LDA #$58 
STA $02C0 
LDA #$90 
STA $6A 
STA $D407 
LDA #$02 
STA $9432 
LDA #$E2 
STA $9433 
LDA #$42 
STA $9434 
STA $9435 
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LDA #$FF 
STA $9436 
RTS 


23 

24 

25 

ASM and RUN. 

This should produce a small space ship near the top left of the 
screen. This square is known as a 'Player Missile Graphics'. 
It is the size of eight double sized pixels but can be moved 
about the screen quite easily and over other characters. It is 
controlled by the registers (hands) of the ANTIC chip. These 
registers are similar to the registers of the microprocessor 
but in order to use them directly they have been 'mapped' onto 
memory from D400 to D5FF. 

The term 'mapped' means that these registers have been put over 
the memory. When you access the memory you are in fact dealing 
with the registers of the ANTIC chip or whatever else may be 
mapped over that memory. To use the description of the post 
office boxes we were using before, you could imagine this sort 
of mapped memory as post office boxes with false bottoms, and 
chutes that connect the box to some sort of machine somewhere 
else in the post office. 


Moving Player-Missile Graphics 

What we are going to do is write a program to move our Player 
around the screen.The horizontal position of the four players 
is controlled by registers at locations 53248 to 53251. We are 
going to move player zero across the screen by incrementing his 
horizontal position register (53248). 


Looping using JMP 

There is an instruction for this - it is the JMP (JUMP) 
instruction. Like BASIC's 'GOTO' you have to tell the 'JMP' 
where to jump to in the form JMP address (JMP low Low Byte, 
High Byte) (ABSOLUTE ADDRESSING). 

We will use this instruction to create a program equivalent to 
the following BASIC program. 


INITIALISE 


100 POKE 53248,X:X=X+4 
110 GOTO 100 
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program and add the 


Delete the RTS from the end of the last 
following lines with APPEND: 


26 

27 

28 

29 

30 

31 

32 

33 

34 


LOOP 


COUNT 


LDX COUNT 
I NX 
I NX 
INX 
I NX 

STX $D000 
STX COUNT 
JMP LOOP 
DFB $00 


ALPA label name addressing 


The addressing mode used in line 33 is absolute addressing. 
One of ALPA's features is that it will calculate addresses for 
you. Normally, when using JMP in absolute addressing mode, you 
would have to work out the address you want the JMP command to 
go to - which can be a nuisance as shown in the following 

1. 0600: 4C 08 06 JMP $0608 

0603: A9 02 LDA #$02 

0605: 8D FD 03 STA $3FD 

0608: 60 RTS 


2. 03FF: 4C FD 03 
0402: A9 02 
0404: 8D FD 03 
0407: 60 


JMP $03FD 
LDA #$02 
STA $03FD 
RTS 


3. 0600: 4C 0B 06 JMP $060B 

0603: A9 02 LDA #$02 

0605: 18 CLC 

0606: 69 04 ADC #$04 

0608: 8D FD 03 STA $3FD 

060B: 60 RTS 


To create program 2. from program 1. 


In other words to move the same program to a different part of 
memory, you would have to go through the whole program, each 
time changing all the JMP instructions that JMP to an address 
within the program, and change them (and only them) to point to 
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To create program 3. from program 1. 

This is done by the addition of a few short commands, something 
you might often do while debugging. You would also have to 
change any JMP commands to a new address. This would of course 
be extremely frustrating, time consuming and error prone. 
Therefore ALPA has a facility for specifying the address of the 
JMP as a label. When the program is entered into memory with 
ASM, ALPA converts the reference from a label to an absolute 
address which the microprocessor can understand and execute.You 
can see these addresses being generated when the ASM command is 


You will notice that the PMG (Player missile Graphic) is moving 
across the screen at speeds that make it blur completely. This 
is only a small indication of the speed of a machine code 
program. 

Infinite loops 

You will also notice that the program- is still going. Just 
like the program 


100 POKE 53248,X:X=X+4 
110 GOTO 100 


Our program will go forever around the loop we have created. 
This is called being stuck in an 'infinite loop'. 

The 'BREAK' key will not get us out of this loop. There is a 
machine code program which is part of BASIC that tests to see 
if the BREAK key was pressed, but our program does not look at 
the keyboard. There are only two ways to escape from an 
infinite loop. One is to press the 'SYSTEM RESET key, which 
creates an NMI (Non Maskable Interrupt) which will stop the 
computer and return it to BASIC. The other way to stop the 
program is to turn the computer off. Press the SYSTEM RESET 
key and you will be returned to BASIC, to continue in ALPA with 
your program intact type: 


GOTO 12 
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There is no other way to exit a machine language routine unless 
it returns by itself using an RTS. Type LIST. NOTE that 
because of the JMP the program would never gets as far as an 
RTS, as in the following BASIC program: 


10 X=4 

20 PRINT "HELLO";X 
30 X=X+4 
40 GOTO 20 
50 END 


Obviously the END statement is never reached here, because of 
the GOTO in line 40. 

To get this program to print HELLO 4 to HELLO 100 we would 


10 X=4 

20 PRINT "HELLO";X 
30 X=X+4 

40 IF X=104 GOTO 60 
50 GOTO 20 
60 END 


Here line 40 will GOTO line 60 only if X=104 and the program 
will GOTO the END statement and stop. If X is not equal to 
104, the program will GOTO line 50 and continue around the 
loop to line 20. To do this in machine language we need one 
instruction to compare two numbers (X and 104) and another 
instruction to JMP depending on the result of the comparison 
(IF_ GOTO 60). 


Comparing numbers 

We have previously (see Chapter 5) met the idea of a flag. It 
is a single bit (single finger) value held inside the 
microprocessor. In chapter 5 we met the carry flag which was 
set to signify the need for a carry in a multibyte addition 
(reset or cleared for a borrow in multibyte subtraction). The 
microprocessor has seven flags for different purposes which it 
keeps in a special purpose register called the Processor Status 
Code Register (or Status Byte). 

These seven flags (and one blank) are each represented by their 
own bit (finger) within this byte and have special 
microprocessor commands dealing with them. These flags are set 
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or reset by most machine code commands. (More will be said 
about them in Chapter 10). For example, ADC sets or resets the 
carry flag depending on the result of the addition. Similarly 
'CMP' (Compare), which compares the contents of the accumulator 
with the contents of a memory location (depending on the 
addressing mode), signifies its result by setting or resetting 
flags in the status byte. 


Branch instructions 

The other instructions we said we would need to write our 
program is one which would jump dependant on the values of the 
processor status flags. This form of instruction is called a 
'branch' instruction. It is different from the JMP instruction 
not only in the fact that it is conditional (dependant on the 
conditions of the status flags), but it is unique in that it 
uses the relative addressing mode. 

Relative addressing means that the address used is calculated 
relative to the branch instruction. More will be said about 
relative addressing and the way the branch instructions work at 
the end of this chapter. Meanwhile we will use ALPA to 
calculate the address for us as we did with the JMP 
instruction. 


Zero Flag 

To test if the result of a CMP instruction on two numbers is 
equal we use the BEQ (Branch on Equal) command. 

To add this to our previous machine language program DELETE the 
last nine lines of the previous program and replace them with 
these, using APPEND: 


25 LOOP LDA COUNT 

26 CMP #$78 

27 BEQ EXIT 

28 CLC 

29 ADC #$01 

30 STA $D000 

31 STA COUNT 

32 JMP LOOP 

33 EXIT RTS 

34 COUNT DFB $00 
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Line 30 has been changed so that the Player does not move as 
far in each jump, hence the the player will be slowed down. 
Also a different method of incrementing the horizontal position 
has been used. Despite incrementing the horizontal position 
register by only one pixel, it will still be moving too fast 
to be seen. ASM and RUN this program. 

NOTE: ALPA has calculated and 'OK'ed both addresses using the 
label references. 


You will see this time that the 
across the screen and stopped as 
with an RTS. 


player moved about halfway 
the program ended normally 


Program summary 


Lines 1 -24 
Lines 25-32 
Line 27 
Line 33 


Initialisation 
Player movement loop 
Test for end condition 


We have managed to find a way to use a loop that tests for a 
condition on which to exit a loop. We could however make this 
more efficient by creating a program that looped until a 
certain condition was met. This difference is subtle but it is 
shown by this BASIC program in comparision to the previous one. 


10 X=4 

20 PRINT "HELLO";X 
30 X=X+4 

40 IF XO104 THEN 20 
50 END 


By creating a loop until a condition is reached we have saved 
ourselves one line of the program. If speed or space were 
important to the program, this would be a useful alteration. 
Overall it is good programming practice to write code with 
these considerations in mind. It produces neater, less tangled 
programs that are easier to read and debug. 

This programming method translates well into machine language 
using the BNE (Branch on Not Equal) command. 


Delete the last ten lines of the previous program and add these 
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the end of it with APPEND: 


25 

26 

27 

28 

29 

30 

31 

32 


LOOP 


COUNT 


LDA COUNT 
CLC 

ADC #$01 
STA $D000 
CMP #$80 
BNE &LOOP 
RTS 

DFB $00 


LIST the program as it currently stands. 


Program summary 

Lines 1 -2# 
Lines 25-30 
Lines 31 


Initialisation 
Player movement loop 


You will see that by changing the loop we have untangled the 
flow of the program. ASM and RUN the program to verify that it 
still functions the same with the changes. As you can see, 

there are many ways to write the same program. The notion of 

right and wrong ways of machine language programming are 
absurd, to quote a well used phrase, 'Don't knock it if it 
works'. It may be that programs that are structured well are 

better for you as they are more legible and easier to 
understand. 

There is a lot we can learn by knowing how an instruction 
works. The CMP instruction for example compares two numbers by 
doing a subtraction (accumulator - memory) without storing the 
result in the accumulator. Only the status flags are set or 
reset. They in fact test the status register 'zero' flag and 

stand for: 

BEQ - Branch on Equal to zero 

BNE - Branch on Not Equal to zero 
It is the condition of the zero flag which is set by the result 
of the subtraction done by the CMP command (accumulator - 
memory = 0 which sets the zero flag = 1). This flag is then 
tested by the BEQ or BNE command. This may seem a meaningless 
point until you realise that, since the CMP command is done by 
subtraction, the carry flag will also be set by the result. In 
other words, if the subtraction perfomed by the CMP needs a 
'borrow' (A - Mem < 0, A less than memory), then the carry will 
be cleared (CARRY =0). If the subtraction does not need a 
'borrow' (A - Mem > 0, A greater than or equal to memory), then 
the carry will be set (CARRY =1) 
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Therefore the CMP command tests not only A = Mem but also A < 
Mem and A < Mem and therefore (if A > Mem but A < > Mem) then A 
> Mem. We can now write our BASIC program: 


10 X=4 

20 PRINT "HELLO";X 
30 X=X+4 

40 IF X<101 GOTO 20 
50 END 


This makes the program even more self explanatory. It shows 
clearly that values of X bigger than the cutoff 100 will not be 
printed. To test for the accumulator less than memory, you use 
the CMP followed by BCC (Branch on Carry Clear) because a 
borrow will have occurred. To test for the accumulator greater 
than or equal to memory use CMP followed by BCS (branch on 
Carry Set). 

Write a machine language program to move a player across the 
screen and test for A < memory (as in previous BASIC programs). 


Relative addressing 

All branch instructions using an address mode called relative 
addressing (JMP is not a branch instruction). In relative 
addressing the address (the destination of the branch) is 
calculated relative to the branch instruction. All branch 
instructions are two bytes long - one byte specifies the 
instruction the other byte specifies the address. This works 
by the second byte specifying an offset to the address of the 
first byte after the instruction according to the Tables in 
Appendix 4. From 0 - 7F means and equivalent branch forward 
and from 80 - FF means a branch backward of 256 - the value. 

Therefore: 

F0 03 BEQ dest 

8D FD 03 STA $3FD 

dest 60 RTS 

will be the same no matter where in memory it is placed. 

The value 3 as part of the branch instruction is the number of 

bytes to the beginning of the next instruction (8D). 

1st next byte (00) 

2nd next byte (06) 

3rd next byte (60) 
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With the following programs, check that the destination address 
of the branch is in fact the address of instruction after the 
branch plus the offset, e.g. 


0600: FO 03 BEQ $0605 

0602: 8D FD 03 STA $3FD 

0605: 60 RTS 


and 


03FD: F0 03 BEQ $0402 
03FF: 8D 00 06 STA $600 
0402: 60 RTS 


The machine code remains the same but the disassembled version 
differs. The program will work exactly the same at either 
address. This is completely opposite to the case of the JMP 
which uses absolute addressing and cannot be relocated. 
Fortunately we do not have to calculate offsets using the 
tables, because these offsets would have to be recalculated 
every time we added an instruction between the branch command 
and its destination address. When we use the branch command we 
can get ALPA to calculate the offset for us using branch label 


Use ALPA to write some programs with branch instructions in 
them, using the label feature, and check ALPA's output by 
disassembling the ASMed code, then verify that the branch takes 
the correct path using the relative branch table in Appendix 4. 


Chapter 6 SUMMARY 

1. A Player-Missile is a character eight pixels wide ,256 
pixels high and the size of 32 normal characters, which can be 
moved over the screen on top or behind other characters. 

2. The command JMP address is the equivalent to BASIC's GOTO 
command. It makes the program jump to the address specified. 

3. ALPA can handle addresses as either absolute addresses 
($5610) or as labels, e.g, JMP WORD (Jump to the value of the 
label WORD). 

4. To break out of an infinite loop, press system RESET and to 
start ALPA without losing your current program enter: GOTO 12 
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5. The microprocessor's STATUS CODE Register has seven flags 
(and one blank) which are set by some machine code 
instructions. 

6. Branch instructions jump conditional on the state of the 
flag referred to by the instruction, e.g., 


BEQ Branch on Equal Z = 1 
BNE Branch on Not Equal Z = 0 
BCS Branch on Carry Set C = 1 
BCC Branch on Carry Clear C = 0 


7, The CMP compares two bytes (by doing a subtraction without 
storing the results). Only the flags are set by the outcome. 

Flags CARRY ZERO Signifies 
0 0 A < Mem 

Value 1 1 A = Mem 

1 0 A > Mem 

1 ? A >= Mem 


8. Relative addressing mode, used only for branch 
instructions, specifies an address relative to the instruction 
which uses it, e.g. BNE 03 means branch three memory addresses 
forward (see table Appendix 4). The destination of a branch 
instruction is preceeded by an ampersand which tells the 
assembler that the addressing mode is relative. 

9. ALPA handles this addressing for you if you specify branch 
labels. 
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Chapter 7 

Counting, Looping and Pointing 


Counting to control a loop 

Suppose we want to multiply two numbers together. There is no 
single machine language instruction which can do this, so we 
would have to write a program to do it. We could for example, 
add one number to a total as many times as the other number is 
large, e.g, 


10 A=7 

20 T=T+A:REM add three times 
30 T=T+A 
40 T=T+A 

50 PRINT "7*3=";T 


It would be much easier and more practical (especially for 
large numbers) to do this in a loop, e.g., 


10 A=7:B=3 
20 T=T+A 
30 B=B-1 

40 IF BO0 THEN GOTO 20 
50 PRINT "7*3=";T 


NOTE: this is by no means the best way to multiply two numbers, 
but we are only interested in the instructions here. A 
preferred method is described in chapter 10. 


Counting using the accumulator 

In this short program, unlike any other program we have dealt 
with previously, there are two variables. A, which we are 
adding to the total, and B which controls the loop. In this 
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case we couldn't stop our loop as we have done in the past by 
testing the total, because we would have to know the answer 
before we could write the program. Our machine language 
program would look, along the lines of what we have done 
previously, like this: 


6 

7 LOOP 


9 


11 

12 

13 

14 

15 

16 

17 A 

18 B 


ORG $0600 
PLA 

LDA #$00 
STA A 
LDA #$03 
STA B 
LDA A 
CLC 

ADC #$07 
STA A 
LDA B 
SEC 

SBC #$01 
STA B 
BNE &LOOP 
RTS 

DFB $00 
DFB $00 


Counting using memory 

Most of this program consists of loading and storing between 
the accumulator and memory. Since we so often seem to be 
adding or subtracting the number one from a value as a counter, 
or for other reasons, there are special commands to do this for 
us. INC (Increment Memory) increments the contents of the 
address specified by one and puts the result back in memory at 
the same address. The same goes for DEC (Decrement Memory), 
except that it subtracts 1 from memory. 

NOTE: INC and DEC do not set the carry flag - they do set the 
zero flag. 


We will now write the program thus: 


NEW 

APPEND 

1 ORG $0600 

2 PLA 
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and what does 'general purpose' mean? Well, so far we have met 
one non-general-purpose register, the microprocessor status 
register (there are another two which we will meet in future 
chapters). The status byte can only be used to contain status 
flags and nothing else, as compared to the accumulator which 
can hold any number between 0 and 255 representing anything. 

The X and Y can, like the accumulator, hold any number between 
0 and 255, but there are many functions of the accumulator they 
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cannot do, e.g., Addition or Subtraction. The X and Y 
registers are extremely useful as counters. 

They can perform the following operations (compared to those we 
have already discussed for the accumulator and for memory). 


LDA Load Accumulator with memory 

LDX Load X with memory 

LDY Load Y with memory 

STA Store Accumulator in memory 

STX Store X in memory 

STY Store Y in memory 

INC Increment memory 

INX Increment X (Implied addressing mode) 

INY Increment Y 

DEC Decrement memory 

DEX Decrement X (Implied adressing mode) 

DEY Decrement Y 

CMP Compare Accumulator with memory 

CPX Compare X with memory 

CPY Compare Y with memory 

Using the X register as a counter 

We will now write our multiplication program using the X 
register as the counter. Type in the following: 


NEW 

WATCH 

(WHAT ADDRESS )? 03FD 
APPEND 


2 

3 


5 LOOP 

6 


9 

10 


ORG $0600 
PLA 

LDX #$03 
LDA #$00 
CLC 

ADC #$07 
DEX 

BNE &LOOP 
STA $03FD 
RTS 
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This routine is slightly shorter and considerably Easter than 
the orginal but otherwise not all that different. Rewrite all 
the commands using the X register and replace them with the 
equivalent Y register commands. Practise using the X and Y 
register in place of or with the accumulator in some of our 
previous programs. 


Moving blocks of memory 

How would you write a program to move a block of memory from 
one place to another? For instance to move the memory from 
8000 - $8050 to the memory at $7000 - $7050. The following is 
how not to do it: 


LDA $8000 
STA $7000 
LDA $8001 
STA $7001 
LDA $8002 


This is a ridiculous way to even think of moving blocks of 
memory, because of the size of the program we would have to 
create (However it is the absolute fastest method of moving 
blocks of memory). 

One possible way of writing the program would be: 


LDA $8000 
STA $7000 


followed by some code which did a two byte increment to the 
address part of the instruction and then a loop to go through 
the whole block to be moved. This is an extremley interesting 
concept to think about. It is a program which changes itself 
as it functions, it is called 'self modifying code'. 

But because it changes itself it is very hard to use correctly. 
It is also considered very poor programming practice to use 
because it is prone to errors ( one mistake in writing or 
calculations will send your computer crazy and you will 
probably have to switch off and back on to recover). Self 
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modifying code is also extremely hard to debug. However, there 
can be some advantages, it would be very hard for anyone to 
understand this kind of coding (protection) and it may be safe 
to use if carefully written and well documented. 

Self modifying code is therefore obviously not the answer to 
our problem. The answer in fact, lies in addressing modes. 
Originally we called addressing modes ways of accessing data 
and memory in different formats. We have so far seen: 


Implied addressing 

The data is specified as part of the instruction, e.g., SEC, 
DEY. 


Relative addressing 

Addressing relative to the instruction - used only in branches. 

Absolute addressing 

The data is specified by a two byte address in low byte, high 
byte format. 

Indexed addressing 

Our new method of addressing is called 'indexed addressing'. 
It finds the data to be used by adding a byte index to the 
absolute address specified in the instruction. The indexing 
byte is taken from the X or Y register (depending on the 
instruction used). The X and Y registers are called 'Index 
registers'. 

To use our post office analogy, it is like being given two 
pieces of paper, one with a two byte address on it and one with 
a one byte index (0 - 255). To find the correct box you must 
add the two numbers together to obtain the correct result. The 
number on the indexing paper may have been changed, the next 
time you are asked to do this. 


Using the X register as an Index 

With this addressing mode, our program to move a block of data 
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bee 


;imple. Type the following: 


comes quite s 


NEW 

APPEND 


LOOP 


ORG $0600 
PLA 

LDX #$00 
LDA $9C40,X 
STA $9C68,X 
I NX 

CPX #$28 
BNE &LOOP 
RTS 


NOTE here that the mnemonic form of indexed addressing has its 
address field made up by the absolute address, a comma and the 
register used as the index, even though the following is true: 

BD409C LDA $9C40,X 

B9409C LDA $9C40,Y 

It is the instruction, not the address field, which changes in 
the actual machine code. RUN the program. As you can see, we 
have used the screen memory again to show that we have in fact 
duplicated a block of memory. One line on the screen will be 
copied into the line below (the first line onto the second 
line). Be sure to have some text on the first line to see the 
effect! 

Non-symmetry of commands 

If, as was suggested when we introduced the X and Y registers, 
you have substituted the X or Y for the accumulator in some of 
the early programs, you may be wondering if we could do that 
here. The answer is no. Not all the commands can use all the 
addressing modes. Neither Y or X (obviously not X) can use the 
index, X addressing mode being used here with the store (STA). 
It is possible to do a LDY ADDR.X but not a STY ADDR,X. For a 
list of addressing modes possible for each instruction, don't 
forget Appendix 1. 

Searching through memory 

We can use the knowledge we have gained up to this point to 
achieve some interesting tasks quite simply. For example, if 
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asked to find the fourth occurrence of a certain number, e.g., 
A9 within 255 bytes of given address, how do we do it? 

The best way is to start simply and work your way up. To find 
the first occurrence of A9 we could write: 


NEW 

APPEND 


2 

3 

4 LOOP 

5 

6 

7 

8 

9 

F0FF) 

10 FOUND 


ORG $0600 
PLA 

LDY #$00 
LDA #$A9 
CMP $F000,Y 
BEQ &FOUND 
INY 

BNE &LOOP 

RTS (not having found A9 from F000 
RTS (having found an A9) 


We would put a counter program around this routine: 

LDX #$00 
count loop FIND 'A9' 

I NX 

CPX #$04 
BNE countloop 


We can combine these 


3 

4 

5 

6 L00P1 

7 

8 LOOP2 

9 


11 

12 L00P3 

13 

14 

15 

16 


into a single program: 
ORG $0600 
PLA 

LDX #$00 
LDY #$00 
LDA #$A9 
CMP $F000,Y 
BEQ &LOOP3 
INY 

BNE &L00P1 
STX $03FD 
RTS 
I NX 

CPX #$04 
BNE &LOOP2 
STX $03FD 
RTS 
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In this program, when finished, if X = 4, then the fourth 
occurence of A9 was at $F000,Y (through RTS at line 16). 

If X < 4, there were not four occurrences of A9 from $F000 to 
$F0FF (through RTS at line 11) 


Line 14 continues the find routine from the 1 INY'. If it 
started from the 'CMP' it would still be looking at the A9 
found before. Type: 

WATCH 

(What address )? 03FD 

ASM and RUN this program. The results will tell you whether 
four A9's were found. Change the program to tell you where the 
fourth A9 was located (STY $03FD). ASM and RUN it again to see 
the result. We will now change a few things to make this 
program clearer (as in the earlier chapter). Type the 

NEW 

APPEND 


LOOP 


9 


12 

13 

14 EXIT 


ORG $0600 
PLA 

LDX #$00 
LDY #$00 
LDA #$A9 
INY 

BEQ &EXIT 
CMP $EFFF,Y 
BNE &LOOP 
I NX 

CPX #$04 
BNE &LOOP 
STX $033D 
RTS 


As shown before this program should now 
Type: 


Program Summary 
Lines 1-5 
Lines 6-9 
Lines 10-12 
Lines 13-14 


Initialisation 
Find 'A9' loop 
Counter 
End 


be easier 


(Since Y is incremented before it is used, its initial index 
value is 1. Therefore the compare instruction address field 
has been set back by 1.) 
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ASM and RUN the program. The WATCH function will show you the 
results the contents of $03FD = contents of X = number of 
'A9 1 s' found. (The maximum is still 4 - you can change this in 
line 11 if you wish). 


Using more than one Index 

We will now write a program using both index registers to index 
different data at the same time. Our program will create a 
list of all the numbers lower than $38 from $F000 to $F0FF. 
Type the following: 

NEW 
APPEND 


2 


5 LOOP 

6 


10 

11 L00P2 

12 

13 

14 

WATCH 

(what address )? 03FD 


results. Y is used as a pointer to where we are 
data from. NOTE here that Y starts at $FF, and is 
so at the first $A9 the Y register contains zero. 

To test for numbers less than $38 we have used CMP and BCS (A 
>= Mem see Chapter 6) to skip the store and increment the 
storage pointer instructions. ASM and RUN the program. 

Zero page indexed addressing 

All the indexing instructions we have used so far have been 
indexed from an absolute address (absolute indexed addressing). 


storing our 
reading our 
incremented 


ORG $0600 
PLA 

LDX #$00 
LDY #$FF 
INY 

LDA $F000,Y 
CMP #$38 
BCS &L00P2 
STA $9C40,X 
I NX 

CPY #$FF 
BNE &LOOP 
STX $03FD 
RTS 
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It is also possible to index from a zero page address (see 
chapter 2). To rewrite the previous program to look through 
the first 256 bytes of memory (0 - 255), all we need to do is 
change line 40 to LDA $00,Y. But if you check with the list of 
instructions in Appendix 1, there is no 'LDA zero page,Y' - 
only 'LDA zero page,X'. We have two choices of what to do 
here. In practice we would probably continue using the 
absolute indexed instruction. 


BD 0000 LDA $0000,Y 


For the purposes of this exercise, however, we will swap all 
the usages of X and Y and use the LDA zero page,X. Type: 

NEW 

APPEND 


5 LOOP 

6 


9 


12 

13 

14 


ORG $0600 
PLA 

LDY #$00 
LDX #$FF 
I NX 

LDA $00,X 
CMP #$38 
BCS &L00P1 
STA $9C40,Y 
I NY 

CPX #$FF 
BNE &LOOP 
STY $0334 
RTS 


LIST 


ASM and RUN 


This shows that you must be careful with your choice of 
registers. Although they can do many of the same things, there 
are some commands which cannot be done by some registers in 
some addressing modes. It is wise to constantly refer to the 
list of instructions in Appendix 1 while writing programs. 


Chapter 7 SUMMARY 

i« INC - adds one to the contents of memory at the specified 
address. 
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2. DEC - subtracts one from the contents of memory at the 
address specified. 

3. The zero flag (but not the carry) is set by the INC and DEC 
instructions. 

4. These are mostly used as loop counters to keep the 
accumulator free for other things. 

5. X and Y the microprocessor's other two general purpose 
registers (the first being the accumulator), can be used as 
counters or as index registers. 

6. Indexed addressing adds the value of the register specified 
to the absolute (or zero page) address used to calculate the 
final address of the data to be used. 

7. Many of the instructions are similar if used on A, X or Y, 
but there are certain instructions and addressing modes which 
are not available for each register. When writing programs, 
make sure the instructions you are trying to use exist in the 
format you wish to use them in! 
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Chapter 8 

Using Information Stored in Tables 


One of the major uses of index registers is the looking up of 
tables. Tables may be used for many reasons - to hold data, to 
hold addresses of various subroutines, or perhaps to aid in the 
complex conversion of data from one form to another. 


Displaying characters as graphics 

One such conversion, for which there is no formula that can be 
used, is the conversion from screen code to the shape of the 
character displayed on the screen. Normally this done by the 
computer's hardware and we do not have to worry about it. When 
we are in graphics mode, however, this part of the computer's 
hardware is turned off. In normal character screen mode, our 
post office boxes within screen memory display through their 
'glass' fronts the character which corresponds to the number 
stored in that box. 

That is, we are seeing what is in the box through some sort of 
'filter' which converts each number into a different shape to 
display on the screen. In graphics mode, this 'filter' is 
taken away and what we see is each bit (finger) of each number 
stored throughout screen memory. For each bit in each byte 
that is turned on, there is a dot (pixel) on the screen. 

In other words the byte $11 which looks like '00010001' would 
be displayed on the screen as eight dots, three black dots 
foLlowed by one white dot, followed by three black dots, 
followed by one white dot. Depending on your television, you 
may be able to see the dots making up the characters on your 
screen. Each character is made up by a grid of eight dots wide 
and eight dots high. Since we have just determined that we can 
display eight dots on the screen using one byte, it follows 
that to display one character eight dots wide by eight dots 
high, we would need to use eight bytes one on top of the next. 
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For example a character would look like: 


8x8 pixel grid binary byte hexadecimal byte 

equivalent equivalent 


0 1 2 3 4 5 6 7 



Graphics memory 

The memory as displayed in graphics mode 8 runs straight across 
the screen. Each byte represents eight pixels horizontally and 
there is 40 bytes to a row. In the character mode we saw that 
the screen memory started at $9C40, $9C41 next to that, $9C42 
next to that and so On to the end of the first row. In 
graphics mode 8 the characters are displayed as follows; the 
top left hand corner of the screen is at $8150, $8151 is 
directly opposite and $8177 is at the end of the line. The 
next row of pixels down start at $8178 ($8150+$28), the next 
row down at $81A0 ($8150+$50) and so on down to the end of 
graphic memory at $9F4F. 

In this way the screen memory is defined one line block at a 
time (forty bytes horizontally) across the screen. This is the 
same for all 192 rows positions down the screen. This means 
there can be forty bytes by eight bits (40 x 8 = 320 pixels) 
across the screen. 
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The entire screen in graphics mode 8 is 320 x 192 pixels and 
takes up 320 x 192 / 8 = 7680 bytes of memory (this is for a 
full graphics mode not a mixed text and graphics). The 
starting point of the screen in both graphics and character 
mode can be changed to suit the programmer (see Appendix 6). 
It is possible to see the BASIC program ALPA on the screen as a 
series of dots. It is vitally important that we do not 
overwrite ALPA while drawing on the screen. 

We have shown that the shape of the character A can be 
represented by a string of eight bytes. We have also shown 
that the first eight bytes of screen memory make up one 
character position. Therefore by putting those eight values 
into those eight bytes, we could make an A appear on the screen 
in the top left hand corner. 


Copying the character sets 
from ROM 


Type in the following program. It will copy some 
character sets down from character memory to where they 
more easily used. Don't worry about the instructions he 
yet covered. Executing this program as it presently 
won't change anything. 


NEW 

APPEND 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 L00P1 

11 L00P2 

12 

13 

14 

15 

16 

17 

18 

19 

20 


ORG $0600 
PLA 

LDA #$00 
STA $CB 
STA $CD 
LDA #$90 
STA $CC 
LDA #$E0 
STA $CD 
LDY #$00 
LDA ($CD),Y 
STA ($CB),Y 
I NY 

BNE &L00P2 
INC $CC 
INC $CE 
LDA $CE 
CMP #$E3 
BNE &L00P1 
RTS 


if the 
:an be 




NWATCH 

ASM and RUN this program. 
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You now have a copy of the ROM character set starting at RAM 
memory location $9000. Only the first 128 characters have been 
copied by this routine. 

We will now add to the end of the last program to define our 
own characters. At the moment there is a copy of the 
characters in RAM but the video chip is still fetching it's 
character definitions from ROM. We must tell the video chip to 
start getting it's definitions from RAM. To do this we load 
memory location 756 decimal with the page of the character set. 
A page in 6502 is defined as 256 bytes. The definitions in RAM 
can then be changed to suit us. Add these lines to the end of 
your last program. Delete the last line from your program and 
Type: 


APPEND 


20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 


LDA #$90 
STA #$02F4 
LDA #$FF 
STA $9000 
STA $9001 
STA $9002 
STA $9003 
STA $9004 
STA $9005 
STA $9006 
STA $9007 
RTS 


ASM and RUN this program. 


We now have our character set starting at $9000 and our space 
has been redefined as a solid block of pixels. To put back the 
orginal character set press RESET and GOTO 12. The RESET 
routine replaces the pointer to the ROM routine. 

Indirect indexed addressing 

There will be some cases where you may be unsure as to which 
table you want to find your data in. In other words, imagine a 
program which lets you decide whether you wanted to print the 
message in upper or lower case letters after the program had 
run. You will want to use one of the two tables decided on 
midway through the program. This could be done by two nearly 
identical programs, each accessing a different table in memory 
and have the beginning of the program decide which one to use. 
Of course, this would be wasteful of memory. 
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To access data using this method, there is an addressing mode 
called indirect indexed addressing, which allows you even 
greater flexibility as to where you place your data. Indirect 
indexed addressing is similar to absolute indexed addressing 
except that the absolute address is not part of the instruction 
but is held in two successive zero page locations pointed to by 
the indirect indexed instruction. In other words, the contents 
of the zero page address pointed to by the indirect indexed 
instruction, is the low byte (of a low byte - high byte pair) 
that contains an address which is indexed by the index register 
Y to obtain the final address. (Indirect indexed addressing is 
always indexed using the 'Y' register). 

Imagine the following situation using our post office box 
analogy. You are handed an instruction to look in a box (zero 
page). The number you find in that box and the box next to it, 
go together to make an absolute address (low byte - high byte 
format). You are then told to add an index (Y) to this address 
to find the address you are looking for. 

The mnemonic for this instruction is QQQ (ZP),Y where QQQ is an 
instruction of the form, LDA. ZP is a one byte zero page 
address and the Y is outside the bracket to signify that the 
indirection is taken first, and the index added later. Type in 
the following example program: 

NEW 

APPEND 


6 

7 

8 

9 

10 
11 
12 

13 

14 

15 

16 

17 

18 

19 COPY 

20 

21 COPYA 

22 


PLA 

LDA #$00 
STA $CB 
LDA #$E0 
STA $CC 
LDA #$40 
STA $CD 
LDA #$9C 
STA $CE 
JSR COPY 
LDA #$00 
STA $CB 
LDA #$E1 
STA $CC 
JSR WAIT 
JSR COPY 
RTS 

LDY #$00 
LDX #$FF 
LDA ($CB),Y 
STA ($CD),Y 
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23 

24 

25 

26 

27 WAIT 

28 WAITA 

29 WAITB 

30 

31 

32 

33 

34 

35 


I NY 
DEX 

BNE &COPYA 
RTS 

LDY #$FF 
LDX #$FF 
DEX 
NOP 
NOP 

BNE &WAITB 
DEY 

BNE &WAITA 
RTS 


This program will copy part of the ROM data to the screen, wait 
for a second and then copy some other ROM data to the screen. 
The subroutine COPY will move any page to any other page. It 
is only necessary to change the pointer to the souce in $CB-$CC 
and the pointer to the destination in $CD-$CE and call the 
routine. The beauty of indirect Y is that it can make a 
subroutine totally generalized. By just changing some zero 
page locations, pointers are changed and a subroutine can use 
totally different data. The instruction NOP doesn't do 
anything, it just takes a certain amount of time to execute 
and is used as a time delay. 


To change the data that is being displayed change the source 
pointers on lines 3,5,12 and 14. Needless to say the indirect 
Y instruction is incredibly useful, however it must be used 
with discretion . There are only 256 zero page memory 


Register transfer instructions 

In the last program we used an instruction that you haven't 
previously met - TAY (Transfer A into Y). This is only one of 
a group of quite simple instructions to transfer the contents 
of one register to another. 


The 




TAX (Transfer A into X) 
TAY (Transfer A into Y 
TXA (Transfer X into A) 
TYA (Transfer Y into A) 
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just covered, that was the Indirect Indexed addressing. The 
order of the words explains the order of the operations. 
Previously we saw indirect indexed in the form, QQQ (ZP),Y, 
where.the indirection was performed first followed by the 
indexing. 


In indexed indirect QQQ (ZP,X), the indexing is done first to 
calculate the zero page address which contains the first byte 
of a two byte address (low byte - high byte format), this is 
the eventual destination of the instruction. 


Imagine that you had a table of addresses in zero page. These 
addresses point to data or seperate tables in memory. To find 
the first byte of these tables you would use this instruction 
to index through the zero page table and use the correct 
address to find the data from the table you were looking for. 
In terms of post office boxes, we are saying here is the number 
of a post office box (zero page). Add to that address the 
value of the indexing byte (X register). From that calculated 
address, and from the box next to it (low byte - high byte), we 
create the address which we will use to locate the data we want 
to work on. 


Indirect addressing 

The last addressing mode we will cover is called Indirect 
absolute addressing. There is only one instruction which uses 
indirect addressing and that is the JMP command. 

The JMP using absolute addressing 'Jumps' the program to the 
address specified in the instruction (like GOTO in BASIC). 

In indirect addressing, 'JMP (address)', the two byte 
(absolute) address within the brackets is used to point to an 
address anywhere in memory that holds the low byte of a two 
byte address, which is the destination of the instruction. In 
other words, the instruction points to an address that, with 
the next address in memory, specifies the destination of the 
Jump. In post office box terms, this means that you are handed 
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the number of a box. You look at the box and the one next to 
it to piece together (low byte - high byte format) the address 
that the JMP instruction will use. 

The major use of this instruction is known as vectored input or 
output. For example if you write a program that jumps directly 
to the ROM output character address to print a character, and 
then you wish output to be directed to disk, you would have to 
change the JMP instruction. Using the vectored output, the 
program does a JMP indirect on a RAM memory location. If the 
disk operating system is told to take control of output, it 
sets up the vector locations so a JMP indirect will go to its 
programs. If output is directed to the screen those locations 
will hold the address of the ROM printing routines, and your 
program will output through there. 

Below is a list of the addressing modes available on the 6502 
microprocessor. 


Implied 
Absolute 
Zero Page 

Relative 

Absolute,X 
Absolute,Y 

Indexed 

Zero Page,X 
Zero Page,Y 

Indirect Indexed 
Indexed Indirect 
Indirect 

also 

Accumulator 

(An operation performed on 


QQQ 

QQQ addr 
QQQ ZP 
QQQ #byte 

BQQ Byte - (L# from ALPA) 

QQQ addr,X 
QQQ addr.Y 

QQQ ZP,X 
QQQ ZP,Y 

QQQ (ZP),Y 
QQQ (ZP.X) 

JMP (addr) 

QQQ A 

the accumulator, see Chapter 10) 


Chapter 8 SUMMARY 

1. In graphics mode 0 the screen is organized as 24 lines of 
40 characters. Each line is organized as a sequential portion 
of memory. 


ined within an 
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2. Characl 




8x8 pixel grid, 



3. Screen memory in graphics mode 8 runs across the screen in 
lines of bytes and then down the screen row by row. 

4. The normal character set is stored in ROM at $E000, but can 
be copied to RAM and altered. 

5. Index registers are used to look up tables (among other 
things), using several indexed addressing modes. 

6. In normal indexed addressing, the index register is added 
to an absolute (or zero page) address to calculate the 
destination address. 

7. In indirect indexed addressing, the destination address is 
calculated by adding the contents of the Y register to to the 2 
byte address stored in zero page locations pointed to by the 
one byte address in the instruction. 

8. In indexed indirect addressing, the eventual address is 
calculated by adding the X register to the zero page address 
which forms part of the instruction. 

9. TAX, TAY, TXA and TYA are used to transfer data between the 
index registers and the accumulator. 

10. Indirect absolute addressing is for JMP only and uses the 
contents of two bytes (next to each other), anywhere in memory, 
as the destination address for the jump. 
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Chapter 9 

Processor Status Codes 


We mentioned in Chapters 5 and 6 the concept of flags within 
the microprocessor. We talked about the carry flag and the 
zero flag, and we discussed the branch instructions and other 
instructions associated with them, e.g., SEC, CLC, BCS, BCS, 
BEQ and BCC. We said that these flags along with several 
others, were stored in a special purpose register within the 
microprocessor called the processor status code register or, 
simply the status register. This register is set out like any 
other register or byte in memory, with eight bits (fingers). 
Each bit represents a flag for a different purpose: 


/ 1 


1 1 

\ 

/overflow 

BREAK 

INTERRUPT 

CARRY 


NEGATIVE BLANK DECIMAL 
(UNUSED) 


A list of which instructions set which flags can be seen in the 
table in Appendix 1. 


1. The carry (C) flag, as we have already seen, is set or 
cleared to indicate a 'carry' or 'borrow' from the eighth bit 
of the byte into the 'ninth' bit. Since there is no ninth bit, 
it goes into the carry to be included in future calculations or 
ignored. The carry can be set or cleared using SEC and CLC 
respectively. A program can test for carry set or cleared 
using BCS or BCC respectively. 

2. The zero (Z) flag, as we have already seen is set or 
cleared depending on the result of some operations, comparisons 
or transfers of data (Load or Store). A program can test for 
zero set or cleared by using BEQ or BNE respectively. 

3. Setting the break (B) flag, using the BRK command causes 
what is known as an interrupt. More will be said about 
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interrupts in Chapter 11. Using a BRK will cause your machine 
language program to stop and the computer to jump indirect on 
the contents of $FFFE and $FFFF. These ROM addresses hold the 
address of a break routine which will return you to BASIC. 
Using the BRK command is a very effective way of debugging a 
program. 

By inserting this command into your program at specific points, 
you will be able to trace (by whether the program stops or 
hangs) how far a program is getting before it does the wrong 
thing. The BRK command gives you the chance to stop a program 
and test the variables in memory to see if they hold the values 
you would expect at this point in the program. Use the BRK 
command with one of the programs from this book to practise 
using it as a debugging tool. 

4. The interrupt (I) flag, may be set or cleared use SEI or 
CLI respectively. When set, the interrupt flag will disable 
certain types of interrupts from occurring (see Chapter 11). 


5. The decimal (D) flag, may be set or cleared using the SED 
and CLD commands respectively. When the decimal flag is set 
the microproccesor goes into decimal or BCD mode. BCD stands 
for Binary Coded Decimal and is a method of representing 
decimal numbers within the computer's memory. In the BCD 
representation, hexadecimal digits 0-9 are read as their 
decimal equivalents and the digits A - F have no meaning. In 
other words: 


00000000 
00000001 
00000010 
00000011 
00000100 
00000101 
00000110 
00000111 
00001000 
00001001 
00010000 
00010001 
00100010 
01000011 
10011000 


BCD REPRESENTATION 

Decimal value of BCD 
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This shows that there are six possible codes between the values 
of 9 and 10 which are wasted. 

In decimal mode the microprocessor automatically adds and 
subtracts BCD numbers, e.g. 

Decimal Flag = 0 Decimal Flag = 1 

17 17 

+26 +26 

~3D 43 

The problems with decimal mode are that it is wasteful of 
memory and is very slow to use mathematically (apart from adds 
and subtracts). On the whole it is easier to use hex and 

convert for output, and so decimal mode is rarely used. Try 

converting some of the programs in this book to decimal mode 

and compare their output to normal calculations. 

6. The negative flag. So far we have said that the only 
numbers that could be held within a single byte were those 
between 0 and 255. We have talked about dealing with numbers 
greater than 255 by using two bytes, but we have not mentioned 
anything about numbers less than zero. We have used them 
without realising it in Chapter 6. We have seen from our use 
of numbers 0 to 255 to represent anything from numbers to 
addresses, from characters to BCD numbers, that the 
microprocessor will behave the same no matter how we use these 
numbers. The memory might be a character an address or an 

instruction, but if we add one to it the microprocessor will 
not care what it is we are representing. It will just do it 
blindly. 

In Chapter 6 we took our number between 0 and 255 and chose to 
use it as the value of a relative branch; we chose $00 to $7F 
as a forward (positive) and $80 to $FF as a backward (negative) 
branch. This numbering system is purely arbitrary but, as it 

turns out, it is mathematically sound to use it to represent 

positive and negative numbers. The system we use is called 

Two's Complement Arithmetic. We can use the tables in Appendix 
3 to convert between normal numbers and Two's Complemnt 
numbers, looking for the number in decimal in the centre and 
finding the correct two's complement hex value on the outside. 
Mathematically, we take the complement of the binary number 

(all l's become 0's and all 0's become l's) and then add 1, 
e.g. , 

COMPLEMENT 

3 = 00000011 — EnmnnuiE 

= l 'l 1 1 1 1 1 T 1 1~ 1 1 1 0~| 1 1 = FD = —3 
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Using this representation, you will see that any byte whose 
value is greater than 127 (with its high bit, bit 7 turned on) 
represents a negative number, and any value less that 128 (high 
bit turned off) represents a positive number. 

1XXXXXXX - NEGATIVE 
0XXXXXXX - POSITIVE 

The negative flag in the status register is automatically set 
(like the zero flag) if any number used as the result of an 
operation, a comparison or transfer, is negative. Since the 
microprocessor cannot tell if the value it is dealing with 
represents a number, character or anything else, it always sets 
the negative flag, if the high bit of the byte being used is 
set. In other words, the negative flag is always a copy of bit 
7 (high bit) of the result of an operation. 

Since the high bit of a byte is a sign bit (representing the 
sign of the number) we are left with only seven bits to store 
the actual number. With seven bits you can represent any 
number between 0 and 127 but, since 0 = -0 on the negative side 
we add one. So two's complement numbers can represent any 
number from -128 to +127 using one byte. 

Let's try some mathematics using our new numbering system. 


Two's Complement Binary Decimal value 

Positive + Positive (no different no normal) 
00000111 + 7 

+00001001 ++ 9 


00010000 16 C = 0V = 0N = 0 


Positive + Negative (negative result) 
00000111 +7 

+ 11110100 +-12 


11111011 - 5 C = 0V = 0N = 1 


Positive + Negative (positive result) 

00000111 +7 
+ 11111101 +_ 3 

(1)00000100 + 4 C = 1V = 0N = 0 


Positive + Positive (answer greater than 127) 
01110011 115 

+ 00110001 + 49 


10100100 - 92 C=0V=1N = 1 

NOTE: this answer is wrong! 
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Two's complement numbering system seems to handle positive and 
negative numbers well, except in our last example. We said 
previously that two's complement could only hold numbers from 
-128 to +127. The answer to our question should have been 164. 
As in Chapter 3, to hold a number greater than 255 we need two 
bytes, here also we must use two bytes. In normal binary a 
carry from bit 7 (high bit) into the high byte was done through 
the carry. In two' s complement we have seen seven bits and a 
sign bit so the high bit is bit 6. The microprocessor, not 
knowing we are using two's complement arithmetic, has as usual 
'carried' bit 6 into bit 7. To enable us to correct this, it 
has set the overflow flag to tell us this has happened. 


7. The overflow flag. This flag is set by a carry from bit 6 

7 6 5 4 3 2 1 0 



127 + 1 128 


The major use of the overflow flag is in signalling the 
accidental change of sign caused by an 'overflow' using two's 
complement arithmetic. To correct for this accidental change 
of signs, the sign bit (bit 7) must be be complemented 
(inverted) and a one carried on to the high bit if necessary. 

This would make our previously wrong result of -92 (10100100) 
become 1 x 128 (high byte) + 36 (00100100). 128 + 36 = 164 
which is the correct answer. 

A program can test for the negative flag being set or cleared 
using BMI (Branch on Minus) or BPL (Branch on Plus) 
respectively. 

A program can test for the overflow flag being set or cleared 
using BVS (Branch on Overflow Set) or BVC (Branch on Overflow 
Clear) respectively. The overflow flag can be cleared using 
the CLV command. 


Chapter 9 SUMMARY 

1. The microprocessor contains a special purpose register, 
processor status code register. 

7 6 5 4 3 2 1 0 


L I I_I 1 I I I I 

I / I / \ ♦ \ X 

OVERFLC^/V BREAK INTERRUPT .CARRY 

NEGATIVE BL*ANK DECIMAL'^•ZERO 


(UNUSED) 


the 
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2. CARRY - SEC, CLC 

BCS, BCC 

3. ZERO - BEQ, BNE 

Set if a result or transfer = 0. 

4. BRK is an instruction which sets the break flag and halts 
the microprocessor (useful for debugging purposes). 

5. INTERRUPT - SEI, CLI 
See Chapters 11, 12. 

6. DECIMAL - SED, CLD 

Sets decimal mode. Addition and subtraction are done using BCD 
(Binary Coded Decimal). 

7. Two's Complement numbering represents numbers from -128 to 
+127. 

negative X = (complement (X)) + 1 

8. NEGATIVE - flag set if bit 7 of result is turned on (=1) 

BMI, BPL 

9. OVERFLOW — set on two's complement carry 

CLV 

BVS, BVC 
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Chapter 10 

Logical Operators and Bit 
Manipulators 


Changing bits within memory 

In this Chapter we will be looking at a group of instructions 
unlike any we have looked at previously, yet they are 
absolutely fundamental to the workings of a computer. They are 
the 'logical' or 'Boolean' operations. They are the commands 
AND (Logical AND), ORA (Logical OR), and EOR (Logical Exclusive 
OR). 

These functions can be built up using fairly simple circuitry, 
and almost all functions of the computer are built up by series 
of these circuits. The logical operations of these circuits 
are available to us through these instructions and it is this, 
and not the hardware, with which we will concern ourselves in 
this chapter. 

We know that bytes of memory and the registers are made up of 
groups of eight bits: 


To explain the functions of these instructions, we look at 
their operation on one bit and then assume that this operation 
is done on all eight bits at once. A logical operator is like 
a mathematical function in that it takes two pieces of data and 
outputs the result as a single piece of data, e.g., 


4+5 = 9 


In this case however the data coming in is going to be single 
bit values, either l's or 0's. To define a logical function we 
draw up a truth table showing all possible inputs and the 
associated outputs. 
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'^^INPUT 1 
INPUT2^\ 

0 

1 

0 

OUTPUT 

FOR 

0,0 

OUTPUT 

FOR 

0, 1 

1 

OUTPUT 

FOR 

1,0 

OUTPUT 

FOR 

1,1 


The logical AND 

The first instruction we will deal with is the AND instruction. 
This performs a logical AND with the accumulator and the 
specified memory, leaving the result in A. The result of a 
logical AND is 1 if input one is a 1 and input two is a 1. The 
truth table for this function looks like: 

AND 


—^^MEMORY 
ACCUMULATOR’"' -—-J 

0 

1 

0 

0 

0 

1 

0 

1 


When extended to an eight bit byte this means that: 


©yTTr 

0 

1 | 0 1 

hl0h 


1 I 0 1 


= 1 ol 0 h loh I o h 1 ol 


The zero flag is set if the result = 0, i.e. if there are no 
coincident ones in the bits of the two bytes used. 

The AND instruction is useful in creating a 'mask' to turn off 
certain bits within a byte. Suppose, within a byte of any 
value, we wish to turn off the 3rd, 5th and 6th bits. We would 
create a 'mask' with only the 3rd, 5th and 6th bits turned off 
and AND this with the byte in question. 
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7 6 5 4 3 2 1 0 

Mask = | 110101110 |1 |1|1| = $97 

AND #$97 

would turn off the 3rd, 5th and 6th bits of whatever was in the 
accumulator. 


The logical OR 

The second instruction we will look at is the ORA instruction. 
This does a logical OR of the accumulator with the specified 
memory leaving the result in the accumulator. The OR function 
outputs a 1 if input one is a 1 or input two is a 1. The truth 
table for this function looks like: 


MEMORY 
ACCUMULATOR _ 

0 

1 

0 

0 

1 

1 

1 

1 


When extended to an eight bit byte this means that: 


ORA 


The zero flag is set if both bytes are equal to zero and hence 
the result is zero. 

The ORA instruction is useful for turning on certain bits 
within a byte using the masking technique. 

Supposing we want to turn on the 2nd, 3rd and 7th bits within a 
byte. We would use a mask with only the 2nd, 3rd and 7th bits 
turned on. 


0 10 10 0 10 
0 | 01 1 | 1 | 1 | 0 | 1 | 0 
| 01 1 j 1 j 1 | 11 0 1 1 | 0 


7 6 5 4 3 2 1 0 

Mask = | 11 010 [ 011 11 10 |0 | = $8C 

ORA #$8C 

would turn on the 2nd, 3rd and 7th bits of whatever was in 
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The logical Exclusive OR 

The last of the logical operations is the EOR. This performs a 
logical exclusive OR of the accumulator and memory leaving the 
result in A. The exclusive OR function outputs a 1 if input 
one is a 1 or input two is a 1 but not if both are 1. The 
truth table for this function looks like: 


^^^MEMORY 

ACCUMULATOR 

0 

1 

0 

0 

' 

’ 

' 

0 


When extended to an eight bit byte the exclusive OR produces: 

FT I o 111111 l ol o Fi~l 
eor [ ilohlolohloh I 
= I 0 I 0 I 0 I 1 I 1 hlolol 

The exclusive OR is used to complement (invert) bits within a 
byte using masking. 

To invert the 1st, 2nd and 4th bits of a byte we would use a 
mask with those bits turned on 

7 6 5 4 3 2 1 0 

Mask = | g>|0|0| 1 |0|11 lj 0 | = $16 
EOR #$16 

would invert those bits of the accumulator. 


Type the following program into ALPA to test these 
instructions: 


ORG $0600 
PLA 

LDA #$CA 
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NEW 

APPEND 




4 AND #$9F 

5 STA $03FD 

6 LDA #$A2 

7 ORA #$84 

8 EOR $03FD 

9 STA $03FD 

10 RTS 

WATCH 

(What address )? 03FD 


Program summary 


Line 3 LDA #$CA A = $CA 11001010 
Line 4 AND #$9F A = $8A 10001010 
Line 5 STA $03FD A = $03FD 10001010 
Line 6 LDA #$A2 A = $A2 10100010 
Line 7 ORA #$84 A = $A6 10100110 
Line 8 EOR $03FD A = $2C 00101100 


ASM and RUN this program 

and verify the results with those we have reached. 


The bit instruction 

There is a useful instruction in the 6502 instruction set which 
performs an interesting set of tests and comparisions. We 
discussed in Chapter 6 how a CMP command did a subtraction 
setting the status flags but not storing the result. Similarly 
BIT (compare memory bits with the accumulator) performs a 
logical AND of A with memory setting only the Z flag as a 
result. The bit instruction also copies bit 7 into the 
negative flag and bit 6 into the overflow flag. 


Rotating bits within a byte 

We will now discuss four other bit manipulation instructions 
and some of their consequences. The first instruction we will 
look at is ASL (Arithmetic Shift Left). This instruction 
shifts all the bits in the specified byte left by one bit, 
introducing a zero at the low end and moving the high bit into 
the carry flag. 
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CARRY 7 6 5 4 3 2 1 0 

l 1 *-03333333® 


hence 
C = ? 
becomes 
C = 0 
and 
C = ? 
becomes 
C = 1 


lMil ® 13®J. i .l®ilJ 

| 1 j 01 1 | 0 11 | g>| 1 | 0 | 

|1|®|1|1lol1iTTgl 

|o|l|l|g |l11lol®| 


Back in Chapter 3 when we explained hex and binary we mentioned 
that each bit had a value of 2 to the power of position -1 

i.e. | 128 [64132116181412111 

You will notice that the value of each box is two times the 
value of the box to the right of it, hence: 


00000001 x 2 = 00000010 and 
00001000 x 2 = 00010000 


and furthermore 


00111001 


2 = 01110010 


The operation required to multiply any byte by two is the 
operation performed by the ASL instruction. 

To use our examples from before: 

C = ? 01010101 ($55) x 2 -> C = 0 10101010 ($AA) 

C = ? 10110110 ($B6) x 2 ->C = 1 01101100 ($6C+CARRY) 
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Type in the following program: 


NEW 

APPEND 


1 ORG $0600 

2 PLA 

3 LDA #$0A 

4 ASL 

5 STA $03FD 

6 RTS 

WATCH 

(What address )? 03FD 
ASM and RUN 


Line 4 uses the 'accumulator' addressing mode. It uses the 
contents of the accumulator as data and returns the data there. 

NOTE: this is different to implied addressing because ASL may 

be used on data from memory. 

We can use this instruction to multiply a number by any power 
of 2 (1,2,4,8...). To use the previous program to multiply by 
eight instead of two, insert the following two lines: 



Rotation with carry 

As with our addition routines, we may find we want to multiply 
numbers greater than 255 (two or more byte numbers). To do 
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this there is a shift command which uses the carry on the input 
end of the shift as well as the output end: 




7 6 5 4 3 2 1 ( 
CARRY 


^1 


The instruction to do this is ROL (Rotate One bit Left). To do 
a two byte multiply by four, type in the following lines: 


1 ORG $0600 

2 PLA 

3 LDA #$17 

4 STA $03FE 

5 LDA #$0A 

6 ASL 

7 ROL $03FE 

8 ASL 

9 ROL $03FE 

10 STA $03FD 

11 RTS 


LIST 

NOTE: 

1. To avoid swapping registers we have used ROL absolute which 
stores its result back in memory. 

2. We have rotated both bytes once and then rotated both 
again. Rotating the low byte twice and then the high byte 
twice would not work, because the high bit from the low byte 
would be lost when the carry was used in the second ASL. 

ASM 

WATCH 

(What Address )? 03FE 
RUN 

Put together the high and low bytes of the answer and check 
that it equals four times the original number. 


Rotating to the right 

LSR and ROR are the equivalent instructions to ASL and ROR, 
except that they shift the bits in the opposite direction. 
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LSR 7 6 5 4 3 2 10 CARRY 

•—EEEEEEEEHtZD 

ROR 7 6 5 4 3 2 1 0 

M IMI h 

CARRY f 

- J 


Just as their opposites can be thought of as multiplication by 
two, so these can be thought of as division by two, and can be 
similarly extended to multi-byte arithmetic. After division 
the number left in the byte is the integer part of the result 
and the bits that have been shifted out represent the 

$lD-r$08 = 3 remainders 


00011101 = 29 remainder 

LSR -s- 2 

00001110 = 14 — 1=1 

LSR =4 

00000111 = 7 — 01 = 1 

LSR t8 

00000011 = 3 —101 =5 


NOTE: Just because the shift and rotate instructions can be 
used for arithmetic do not forget their use for shifting bits, 
e.g., shifting into carry for testing. 


Clever multiplication 

We have said that by shifting bits we can multiply by any power 
of 2 (1,2,4,8,..., 128). These are the same values that 

represent each bit within a byte. We have shown in Chapter 3 
that by adding these values we can produce any number between 0 
and 255. 

If we then multiply by each of these values and add the 
results, this process is then equivalent to multiplying by any 
value from 0 to 255, e.g., 

$16 x $59 = 00010110 x $59 
+ 00010000 x $59 
+ 00000100 x $59 
+ 00000010 x $59 

= 16 x $59 + 4 x $59 + 2 x $59 

95 



which we know how to work out from our previous multiplication. 

This is the algorithm we will use in our generalised 
multiplication routine. We will rotate (multiply by two) one 
number, and add it to total, for each bit turned on in the 
other byte, e.g., 

10110 x $59 

rotate $59 1 0 1 1 [§ 

rotate $59 add to total 1 0 1 BQ 0 

rotate $59 add to total 1 0 Q] 1 0 

rotate $59 1^110 

rotate $59 add to total Q] 0 1 1 0 


For simplicity's sake our generalised multiplication routine 
will only handle results less than 255. 


To multiply $1B by $09 type: 
NEW 

APPEND 


2 


6 

7 

8 

9 LOOP 

10 

12 

13 

14 L00P1 

15 

16 


Program summary 


Lines 1-8 Initialise values to be multiplied and set the 
total to 0. The ROR followed by the ROL has no effect the 
first time through but only the ROL is within the loop. 


ORG $0600 
PLA 

LDA #$1B 
STA $03FD 
LDA #$09 
STA $03FE 
LDA #$00 
ROR $03FE 
ROL $03FE 
LSR $03FD 
BCC &L00P1 
CLC 

ADC $03FE 
BNE &LOOP 
STA $03FF 
RTS 
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Line 9 Except for the first time through this multiplies 

one of the numbers (2) by each time round the loop. 

Lines 10-11 Rotates the other number (1) bit by bit into the 
carry, and then tests the carry to see if the other number (2) 
should be added this time around the loop. If the carry is 

clear, the possibility that the number (1) has been shifted 

completely through (=0 - multiplication is completed) is tested 
line 120 

Lines 12-13 Add to the total (in A) the number (2) which is 
being multiplied by two each time around the loop. 

Line 14 If the branch on line 90 was taken, this will 

test for the end of multiplication (number (1) = 0 shifted 

completely through). If the branch on line 90 was not taken, 
this branch on not equal will always be true because we are 
adding a number (2) greater than zero to a total which will not 
be greater than 255. 

Lines 15-16 end 


NOTE: this multiplication routine is much more efficient than 
the one given in Chapter 7. By that method we would have had 
to loop at least nine times, whereas in this, had we swapped 
and used 9 as number (1) and $1B as number (2), we would have 
only looped four times (number of bits needed to make 9 - 
6 / 01 ). 


WATCH 

(What address )? 03FE 

ASM 

RUN 


and verify the results. 

Now change the numbers in lines 3 and 5 with DELETE and INSERT, 
used to perform a different calculation (make sure the answer 
is >256), e.g., 


3 LDA #$06 

5 LDA #$25 

ASM and RUN 

with these values and again verify the results for yourself. 
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Chapter 10 SUMMARY 



3. EOR (exclusive or) 



| 11 11 g 1 most often used to mask invert bits. 
4. BIT performs AND without storing the result. 

Z is set or cleared 
N becomes bit 7 
V becomes bit 6 


5. ASL 7 6 5 4 3 2 1 0 Arithmetic Shift Left 



CARRY 


most often used to multiply by 2. 

6. ROL 7 6 5 4 3 2 1 0 Rotate One Bit Left 



CARRY 


7. LSR 


Logical Shift Right 



CARRY 


8. ROR 7 6 5 4 3 2 1 0 Rotate One Bit Right 



CARRY 
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Chapter 11 

Details of Program Counter 


The program counter 

We have talked a lot about the different operations that the 
microprocessor can perform, but we have said very little about 
how it goes about those tasks. This is perfectly alright, 
because in most cases we don't need to know. In one case, 
however, knowing how the microprocessor is operating leads us 
to a whole new category of commands and a powerful area of the 
microprocessor's capabilities. 

The microprocessor contains a special purpose two byte register 
called the program counter (PC), whose sole job it is to keep 
track of where the next instruction is coming from in memory. 
In other words the program counter contains the address of the 
next byte to be loaded into the microprocessor and used as an 


If we again turn to our post office boxes, each holding either 
an instruction (opcode) or the data/address it operates on 
(operand), this is what our program looks like: 

L LDA #$57 


y STA 0335 


y RTS 

To 'run' our post office box program, we would go through each 
box in turn and act on the data in the box. Now imagine there 
was a large clock type counter showing a box address which we 
looked at to know which box to find. Normally this counter 
would go up one by one, taking the next byte in order. 
However, if it wanted us to move to a new area of the boxes, it 
would just flash up the address of the next instruction it 
wanted us to find. This is exactly how the JMP command 


A9 

57_ 

8D 

35 

60 
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Storing into the program counter 

The instruction JMP $address only loads the two byte address 
into the program counter, the next instruction is then loaded 
from memory at that address, and a JMP has been executed. 

NOTE: the branch instructions add or subtract from the program 
counter in a similar way, thereby creating a 'relative' jump. 
However branch instructions may only be in the range +129 to 
-126. 

The program counter and 
subroutines 

If it were possible to store the program counter just before 
doing a JMP and changing it to a new address, we would later be 
able to return to the same place in memory by reloading that 
stored piece of memory back into the program counter. In other 
words, if we had noticed that the post office box counter was 
about to change, and we noted down the address it showed (our 
current address) before it changed, we would at some future 
stage place that back on the program counter and return to 
where we had left off. 

This of course, is a subroutine structure, e.g., 


10 PRINT "HELLO THERE" 

20 GOSUB 100 
30 PRINT "I'M FINE" 

40 END 

100 PRINT "HOW ARE YOU TODAY ?" 
110 RETURN 

would print: 

HELLO THERE 

HOW ARE YOU TODAY ? 

I'M FINE 


We said at the beginning of the book that a machine language 
program can be thought of as a subroutine called from BASIC 
using the USR command. 

You can also create subroutines from within a machine language 
program. They are called using the JSR (Jump to SubRoutine) 
command. As when called from BASIC, to return from a machine 
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language subroutine you use the RTS (ReTurn from Subroutine) 
command. 

Type in the following program: 


2 BACK 

3 

4 LOOP 

5 

6 

7 WAIT 

8 DELAY 

9 

10 


ORG $0600 
EQU $02C8 
PLA 

INC BACK 
JSR WAIT 
JMP LOOP 
LDX #$FF 
DEX 

BNE &DELAY 
RTS 


ASM 

RUN 

This program will increment the border color register ($02C8) 
and the border will become a mass of different colored 
horizontal bars. The vertical height of the color bars depends 
on the delay loop in the routine. The bigger the delay the 
greater the bars height. Remember that these programs go 
extremely fast. This program uses an infinite loop so to get 
back to ASM it will be nessary to press RESET and GOTO 12. 


It is good programming style to use subroutines for two major 
reasons. First, it is easy to locate and fix errors within 
subroutines. Secondly, by using subroutines it is possible to 
build up a 'libary' of useful subroutines for regular use. 


We have said that the return address of the routine is stored 
away but we have not said anything about how it is stored. We 
want some sort of filing system to store this address which 
will give us a number of necessary features. 

The stack control structure 

Firstly it must be flexible and easy to use. Secondly, we 
would like to be able to provide for the possibility that a 
subroutine will be called from within a subroutine (called from 

within a subroutine, called from.). In this case we have 

to use a system that will not only remember a return address 
for each of the subroutines called, but will also have to 
remember which is the correct return address for each 
subroutine. The system which we use to store the addresses on 
a data structure is called a 'stack 1 . A stack is a LIFO 
structure (Last In First Out). When an RTS is reached, we want 
the last address put on the stack to be used as a return 
address for the subroutine. 
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Imagine the stack to be one of those spikes that people 
sometimes keep messages on. 


Every time you see a JSR instruction, you copied down the 
return address onto a piece of paper from the post office box 
counter. As soon as you had done this, you spiked the piece of 
paper on the stack. If you came across another piece of paper 
you merely repeated the process. Now when you come across an 
RTS, the only piece of paper you can take of the spike (stack) 
is the top one. The others are all blocked by those on top of 
them. This top piece of paper will always contain the correct 
address for the subroutine that you are returning from (the one 
most recently called). 


Subroutines and the stack 

The JSR and RTS commands do this automatically using the system 
stack. The stack sits in memory from $100 to $1FF (Page 1) and 
grows downwards. Imagine the spike turned upside down. This 
makes no difference to its operation. The top of the stack 
(actually the bottom) is marked by a special purpose register 
within the microprocessor called the Stack Pointer (S). When a 
JSR is performed the two byte program counter is placed on the 
stack and the stack pointer (SP) is decremented by two (a two 


byte address is placed on the stack). 



BEFORE 



Program Counter 

SAB 

1 SCD | 

sp=xx 1 

STACK 

j_J 

Address 

AFTER (JSRSPQMN) 

Program Counter 

| $jk| 

$100 +XX 

| $PQ | $MN| 
STACK 

\ 


Address 


$JK 

$100+XX 


SAB 

S100+XX- 

SP=XX-2 

SCD 

S100+XX- 


An RTS takes the top two bytes off the stack and returns them 
to the program counter. The stack pointer is incremented by 
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BEFORE 


AFTER (RTS) 


Program Counter 

| $PQ | MN | 

STACK 



Address 


$JK 

$100+YY+2 


$AB 

$100+YY+1 

SP=YY 

$CD 

S100+YY 


Program Counter | $AB | $CP| 


SP=YY+2 


STACK 



Address 

S100+YY+2 


The following program is an example of calling a subroutine 
from within a subroutine.This is the previous program with an 
extra delay being called in WAIT named MWAIT. As a result the 
vertical bars will get higher. 


NEW 

APPEND 


2 BACK 

3 

4 LOOP 

5 

6 

7 WAIT 

8 DELAY 

9 

10 
11 

12 MWAIT 

13 MORE 

14 


ORG $0600 
EQU $02C8 
PLA 

INC BACK 
JSR WAIT 
JMP LOOP 
LDX #$FF 
JSR MWAIT 
DEX 

BNE &DELAY 
RTS 

LDY #$10 
DEY 

BNE &MORE 
RTS 


ASM and RUN the program. 


One major advantage of the stack is that it can also t 
store data by using the instructions PHA (Push Accur 
stack) and PLA (Pull Accumulator off stack) respe< 
place the contents of the accumulator on and off the : 




Lvely 

ick. 
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WARNING: make sure you put things on and off the stack in the 
correct order or your machine will not speak to you until you 
have reset it! 

If you use an RTS while there is extra data on top of the 
stack, the RTS will return an address made up of the two top 
bytes of the stack, whatever they are. 

Let's use these instructions to test the operation of the 
stack. Type: 


NEW 

WATCH (address? 03FD) 


2 BACK 

3 


7 SAVE 


9 

10 
11 
12 

13 

14 


ORG 

EQU 

PLA 

JSR 

INC 

RTS 

PLA 

TAX 

PLA 

STX 

STA 

PHA 

TXA 

PHA 

RTS 


$0600 

$02C8 


SAVE 

BACK (border) 


$03FD 

$03FE 


Program summary 


Lines 1- 3 Set the ORG, the value of background register and 

balance the stack 

Line 4 JSR - return address (address of next instruction 

is placed on stack). Actually it points to the byte before the 
next instruction because the PC is incremented each time before 
a byte is 'fetched' from memory. 

Line 5 Increments screen border colour (see Appendix 6) 

just to show that the program has returned satisfactorily. 

Line 6 end. 

Lines 7- 9 Take the top two bytes of the stack 

105 





Lines 10-11 Store them low byte - high byte at $3FD, $3FE. 
Lines 12-14 Return bytes to stack in correct order 
Line 15 End of subroutine. 


ASM and RUN this program. Change WATCH to test address $03FE, 
and RUN again. Put the results together and compare them with 
the expected address. 

The two instructions TSX (Transfer SP into X) and TXS (Transfer 
X into SP) are available to do direct manipualations on the SP. 
Write a progam with a subroutine within a subroutine, both of 
which save the SP in memory via X to see the change in SP when 
a subroutine is called and when an RTS is executed. 


The stack and interrupts 

We mentioned in Chapter 9 the BRK command and its use in 
debugging programs by halting them and allowing you to examine 
variables in 'mid-flight'. What the BRK command actually does 
is something like the operation of a JSR. The BRK command 
performs a JSR indirect to $FFFE, $FFFF. In other words the 
contents of these bytes are placed in the PC and the program 
continues there (at a ROM break handling routine). The BRK 
command also pushes the value of the processor status code (P) 
onto the stack. 

This can be done outside the BRK command using the PHP (Push 
Processor Status byte) instruction. This all leads up to a 
fairly major area of machine language programming on the ATARI 
130XE - Interrupts. However we will not cover these as they 
are too advanced for this book but we will attempt to tell you 
how, where and why they work. 

In general an interrupt is sent to the microprocessor by the 
computer's hardware to alert it to something going on in the 
outside world which requires its attention, e.g, a key being 
pressed, a real time clock, or graphics alerts (see Chapter 12 
and Appendix 6 respectively). 

These interrupts are hardware signals and their effect is to 
stop the microprocessor, no matter what it's doing, and jump to 
an interrupt service routine (via vectors at $FFFE and $FFFF). 

In a similar way to the BRK command an interrupt stores the PC 
on the stack (with the address of the instruction it was in the 
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middle of doing - not the next instruction). It then stores 
the status register (P) on the stack and does an indirect jump 
on the contents of $FFFE, $FFFF which take it to a ROM 
interrupt routine. 

You can control the interrupt service routines to handle 
interrupts from clock timers or other sources in your own way, 
to do things such as move objects at a constant predetermined 
speed and increment time of day clocks as well as many other 
uses. Some of the methods for doing this are described in the 
next chapter. 

Press RESET to return the screen to normal and type GOTO 12. 

Chapter 11 SUMMARY 


Is Program counter (PC) points to the next byte in memory 
minus one to be used as an instruction. 

2. JMP loads an address into the PC. 

3. Branches add or subtract from the PC. 

4. JSR stores the PC on stack and loads the new address into 
the PC (subroutine). 

5. RTS takes the top two bytes off the stack and loads them 
into PC (return address). 

6. The stack can only have things put on at one end. They can 
only be taken off from the same end and in the same order they 
were put on. 

7. The Stack Pointer keeps track of the top of the stack. 

RTS = > SP = SP + 2 
JSR = > SP = SP - 2 

8. PHA, PLA store and retrieve the accumulator from the stack. 
Be sure to take things off the stack in the same order they 


9. TXS, TSX transfer data betweem the stack register 
the X register. 


BRK PC 
Status byte 
Contents of 
(FFFE, FFFF) 


-> Stack (2 bytes) 

- > Stack 

- > PC 


(S) and 
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11. PHP, PLP push and pull a processor status word 
stack. 


the 


12. Interrupts come from chips external to the microprocessor. 

PC - > Stack (2 bytes) 

Status byte - >Stack 

(FFFE , FFFF) PC 

These are processed by the ROM handling routines. 
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Chapter 12 

Dealing with the Operating System 

The Kernal 


This chapter will tell you something about dealing with the 
operating system of the Atari 130XE. It sits in memory from 
$E400 to $FFFF and deals with the hardware side of the computer 
(the other ROM deals with BASIC). The kernal ROM actually 
starts at $E000 but the first one kilobyte is taken up by the 
character set. There are routines in the kernal for opening 
and closing files, printing characters to the screen, getting 
characters from the keyboard, moving the cursor around the 
screen, loading and saving files and other such mundane but 
necessary tasks. 

In this chapter we will give examples of how to use a few of 
these routines (the Appendices will give clues to more but the 
rest is up to you). Armed with these methods and the 
information given in the Appendices (and any other literature 
you have handy), you will be able to create programs that can 
easily and efficiently communicate with the outside world. 

One of the major uses of the kernal is in dealing with 
interrupts. Interrupts can be caused by peripherals, the sound 
chip, the clock and many other places. The clock sends out an 
interrupt every 1/50 a second (1/60 in the U.S.A.). This 
interrupt is used by the kernal to update the time of day clock 
and to check the keyboard for a keypress. 

We said in the previous chapter that an interrupt, as well as 
putting a return address and the status byte on the stack, 
performed an indirect JMP on the contents of memory locations 
$FFFE and $FFFF. We said that this was directed to the 
operating system's interrupt handling routine in ROM. This ROM 
routine does its work and then gives the programmer access to 
the interrupt process by doing a jump through interrupt vectors 
placed in RAM at locations $0222, $0223 (low byte - high byte 
format). Since these vectors are placed in RAM they can be 
changed to point to our program. 
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Our interrupt routine must do one of two things. It must 
either return via the operating system when it is finished (via 
the address that was in the interrupt vector before we changed 
it) or we must 'clean' up the system and return properly from 
an interrupt. In practice it is generally easier to take the 
first choice. If we do it on our own the program must finish 
by: 


1. Taking the registers off the stack. When the ROM interrupt 
routine is called it saves all the registers on the stack. 
These must be returned to the registers in the same order. 

2. We must re-enable interrupts. The ROM routine as well as 
doing a SEI which sets the interrupt flag in the status 
register turns off the interrupts from their source. 

3. Do an RTI (ReTurn from Interrupt). 


NOTE: SEI (Set Interrupt Flag) will make the microprocessor 

ignore any interrupts but will not stop any devices from 
issuing interrupts. This instruction is executed at the 
beginning of the interrupt routine by the 6502 automatically to 
make sure that the interrupt is not interrupted by another 
interrupt. Any time-critical code should have this at the 
start of it to stop interrupts from interfering with it's 
timing. 

CLI (Clear Interrupt Flag) 

Re-enables interrupts to the 6502 processor. This instruction 
is used at the end of some interrupt routines, or if the 


RTI (Return From Interrupt) 

Somewhat like the RTS, this instruction removes those things 
placed on the stack by the interrupt (status byte, program 
counter), thereby returning to where the program left off (with 
status byte undisturbed). This, by restoring the status byte 
will clear the interrupt flag (it could not have been set when 
the interrupt was received!) 

Our sample interrupt program which follows is in two parts. 
The first part sets up the vertical blank interrupt vector at 
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$0222, $0223; it is called once when the program is RUN and 
then returns. The SEI instruction disables interrupts while 
the interrupt vector is being changed. Otherwise an interrupt 
could occur while the routine had only half changed the vector 
and the machine would crash. After the vector is changed, 
interrupts are re-enabled and control is passed back to BASIC. 

The second part which is pointed to by the altered interrupt 
vectors, is called 50 times a second (when an vertical blank 
interrupt occurs). All this the routine does is invert the 
first 255 characters on the screen every time a vertical 
interrupt happens. So the top of the screen will flicker 
between spaces and CHR$(255) very quickly. 


NEW 

APPEND 


9 

10 WRITE 

11 
12 

13 LOOP 

14 

15 

16 

17 

18 

19 

20 

21 ACCUM 

22 XREG 


ORG $0600 

PLA 

SEI 

LDA #$0E 
STA $0222 
LDA #$06 
STA $0223 
CLI 
RTS 

STA ACCUM 
STX XREG 
LDX #$FF 
LDA $9C40,X 
EOR #$FF 
STA $9C40,X 
DEX 

BNE &LOOP 
LDX XREG 
LDA ACCUM 
JMP $C28A 
DFB $00 
DFB $00 


Program summary 


Line 2 Balance the system stack 

Lines 3 Disable system interrupts 

Lines 4- 7 Point at the new interrupt vector 

Line 8 Re-enable the interrupts 

Line 9 Return from the routine 

Lines 10-11 Save the accumulator and X register 

Lines 12-17 Invert the first 255 characters on the screen 
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Lines 18-19 Restore accumulator and X register to their 

orginal value 

Line 20 Jump to the normal vertical blank interrupt 

Line 21-22 Area to store accumulator and the X register 

If you add your own interrupt routine to the machine and you 
want BASIC to continue functioning, then you must at the end of 
your routine jump to the normal interrupt routine. This is 
what the JMP $C28A does. Use the disassembler to study the 
operating system and BASIC 

THE BEST OF BRITISH TO YOU! 

Oh! There is one 6502 instruction which has only been 
vaguely mentioned. That is NOP (No Operation) instruction. 
Although it does nothing it takes a certain amount of time to 
do (two machine cycles). It is used surprisingly often within 
a time delay loop, or to fill a patch within a program where 
you have decided to remove instructions (bad programming!). 
The value for the instruction NOP is $EA. 


Chapter 12 SUMMARY 

1. The Kernal, which is in ROM, handles the computer's contact 
with the outside world. 

2. Kernal resides in memory from $E400 to $FFFF. 

3. SEI - sets the interrupt flag to false and makes the 6502 
ignore any further interrupts. 

4. CLI - clears the interrupt flag, re-enables interrupts. 

5. RTI -> return from interrupt. 

STACK -> Status byte 

STACK -> PC (2 bytes) 

6. NOP -> no operation. 
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Appendix 1 

6502 Instruction Codes 


These tables should be a constant reference while writing 
machine language or assembly language programs. There is a 
list of every instruction with a description, avialable 
addressing modes, instruction format, number of bytes used, the 
hex code for the instruction and a list of the status flags 
changed as a result of the operation. 


6502 MICROPROCESSOR INSTRUCTIONS IN ALPHABETICAL ORDER 


ADC Add Memory to Accumulator with 

AND "AND" Memory with Accumulator 

ASL Shift Left One Bit (Memory or 
Accumulator) 

BCC Branch on Carry Clear 

BCS Branch on Carry Set 

BEQ Branch on Result Zero 

BIT Test Bits in Memory with 

Accumulator 

BMI Branch on Result Minus 

BNE Branch on Result not Zero 

BPL Branch on Result Plus 

BRK Force Break 

BVC Branch on Overflow Clear 

BVS Branch on Overflow Set 

CLC Clear Carry Flag 

CLD Clear Decimal Mode 

CLI Clear Interrupt Disable Bit 

CLV Clear Overflow flag 

CMP Compare Memory and 

Accumulator 

CPX Compare Memory and Index X 

CPY Compare Memory and Index Y 

DEC Decrement Memory by One 

DEX Decrement Index X by One 

DEY Decrement Index Y by One 

EOR "Exclusive-Or" Memory with 

Accumulator 

INC Increment Memory by One 

I NX Increment Index X by One 

INY Increment Index Y by One 

JMP Jump to New Location 


JSR Jump to New Location Saving 
Return Address 
LDA Load Accumulator with 

Memory 

LDX Load Index X with Memory 

LDY Load Index Y with Memory 

LSR Shift Right one Bit (Memory or 

Accumulator) 

NOP No Operation 

ORA "OR" Memory with Accumulator 
PHA Push Accumulator on Stack 

PHP Push Processor Status on Stack 
PLA Pull Accumulator from Stack 

PLP Pull Processor Status from Stack 

ROL Rotate One Bit Left (Memory or 

Accumulator) 

ROR Rotate One Bit Right (Memory or 

Accumulator) 

RTI Return from Interrupt 

RTS Return from Subroutine 

SBC Subtract Memory from 

Accumulator with Borrow 
SEC Set Carry Flag 

SED Set Decimal Mode 

SEI Set Interrupt Disable Status 

STA Store Accumulator in Memory 

STX Store Index X in Memory 

STY Store Index Yin Memory 

TAX Transfer Accumulator to Index X 

TAY Transfer Accumulator to Index Y 

TSX Transfer Stack Pointer to Index X 

TXA Transfer Index X to Accumulator 

TXS Transfer Index X to Stack Pointer 
TYA Transfer Index Y to Accumulator 
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6502 MICROPROCESSOR OPERATION CODES 
IN NUMERICAL VALUE ORDER 


00-BRK 

01 — ORA — (Indirect.X) 


04 - ??? 

05 - ORA - Zero Page 
06-ASL—Zero Page 

08-PHP 

09 — ORA — Immediate 
0A — ASL — Accumulator 
0B-??? 

0C-??? 

0D-ORA —Absolute 
0E-ASL-Absolute 
OF-??? 

10-BPL 

11 — ORA — (Indirect). Y 



15 — ORA — Zero Page.X 

16 — ASL — Zero Page.X 


2F — ??? 

30—BMI 

31 - AND —(Indirect). Y 
32-77? 


33-777 


35- AND-Zero Page.X 

36- ROL-Zero Page.X 


38- SEC 

39- AND-Absolute. Y 
3A — ??? 

3B — ??? 

3C — ??? 

3D- AND — Absolute.X 
3E - ROL - Absolute.X 
3F - NOP 

40 —RTI 

41 -EOR-(Indirect.X) 


45-EOR-Zero Page 
46 - LSR - Zero Page 


19 — ORA — Absolute. Y 



ID-ORA-Absolute.X 
IE-ASL-Absolute.X 

20 —JSR 

21 - AND - (Indirect.X) 


24-BIT-Zero Page 

25 - AND - Zero Page 

26 — ROL — Zero Page 

27 - 777 

28 - PLP 

29 - AND - Immediate 
2A - ROL - Accumulator 
2B — ??? 

2C - BIT - Absolute 
2D — AND — Absolute 
2E - ROL - Absolute 


49 — EOR — Immediate 
4A-LSR-Accumulator 


4D - EOR - Absolute 
4E - LSR - Absolute 
4F — 77? 

50 - BVC 

51 - EOR (Indirect).Y 

52- ??? 

53- ??? 

54 — ??? 

55 _ EOR-Zero Page X 

56 — LSR — Zero Page.X 


59 _ EOR - Absolute. Y 
5A — ??? 

5B — ??? 


5D-EOR-Absolute.X 


5E - LSR - Sbsolute.X 
5F — ??? 

60-RTS 

61 — ADC — (Indirect.X) 


65-ACD-Zero Page 
66 - ROR - Zero Page 


69- ADC-Immediate 
6A-ROR-Accumulator 
6B — ??? 

6C-JMP-Indirect 
6D-ADC-Absolute 
6E - ROR - Absolute 
6F— ??? 

70- BVS 


75 — ADC — Zero Page.X 

76 — ROR — Zero Page.X 

78 - SEI 

79 — ADC — Absolute. Y 


7C-777 

7D — ADC — Absolute.X 
7E — ROR — Absolute.X 

80-??? 

81 —STA—(Indirect.X) 


84 — STY — Zero Page 
85-STA-Zero Page 
86 - STX - Zero Page 


8C-STY-Absolute 
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8D—STA- Absolute 
8E — STX - Absolute 
8F-77? 

90-BCC 

91 — STA — (Indirect).Y 

92- ??? 

93- ??? 

94 — STY — Zero Page.X 

95 _ STA -Zero Page.X 

96- STX —Zero Page.Y 

97- ??? 

98- TYA 

99 —STA-Absolute. Y 

9A-TXS 

9B — ??? 

9C — ??? 

9D — STA — Absolute.X 


AO—LDY-Immediate 
A1 — LDA — (Indirect.X) 
A2 — LDX — Immediate 


A4-LDY-Zero Page 
A5 — LDA - Zero Page 
A6—LDX-Zero Page 
A 7-171 
A8 - TAY 

A9 — LDA — Immediate 
AA —TAX 
AB-??? 

AC — LDY - Absolute 
AD — LDA — Absolute 
AE - LDX - Absolute 


Bl — LDA — (Indirect).Y 
B2 — ??? 

B3 — ??? 


B4 - LDY - Zero Page.X 
B5 — LDA — Zero Page.X 
B6 - LDX - Zero Page. Y 
B7 — ??? 

B8-CLV 

B9-LDA-Absolute.Y 
BA - TSX 
BB-??? 

BC - LDY - Absolute.X 
BD — LDA — Absolute.X 
BE - LDX - Absolute.Y 
BF-??? 

CO — CPY — Immediate 


C3 — ??? 

C4 - CPY — Zero Page 
C5-CMP-Zero Page 
C6-DEC-Zero Page 


CA-DEX 

CB-??? 

CC-CPY-Absolute 
CD-CMP-Absolute 
CE - DEC - Absolute 
CF-??? 

DO-BNE 

Cl — CMP-(lndirect).Y 
D2-?T> 

D3 —??? 

D4 — ??? 

D5-CMP-Zero Page X 
D6 — DEC — Zero Page X 
D7 — ??? 

D8 - CLD 

D9-CMP-Absolute.Y 
DA — ??? 


DB-??? 

DC-??? 

DD-CMP-Absolute.X 
DE-DEC-Absolute.X 
DF- 

EO-CPX- Immediate 
El — SBC — (Indirect.X) 
E2 — ??? 


E4 - CPX - Zero Page 
E5-SBC-Zero Page 
E6 — INC — Zero Page 


E9 - SBC - Immediate 
EA—NOP 
EB-??? 

EC-CPX-Absolute 
ED — SBC — Absolute 
EE — INC — Absolute 
EF-??? 

FO-BEQ 

FI — SBC — (Indirect).Y 


F5-SBC-Zero Page.X 
F6 — INC — Zero Page.X 


F8 - SED 

F9 - SBC - Absolute.Y 


FE - INC - Absolute.X 
FF-??? 


???Undefined Operation 
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Appendix 2 

Hexadecimal to Decimal Conversion 
Table 


This table can be used to convert up to four digit hex numbers to 
decimal. 

How to use the table: 

1. Divide the number into groups of two digits, 

e.g. $F17B-> FI 7B 
$2A 2A 

2. Take the low byte of the number (from above 7B or2A) and look it up 
in the chart. Find the most significant digit (7) in the column on the 
left, find the least significant digit (8) in the row along the top, and find 
the box in which the r ow (7) and th e column (B) cross. In that box you 
will find 2 numbers, 1123 31488] .These are the values of 7B in the 
low byte and the high byte. Since we are looking up the low byte, take 
the value 123. Now find the location of the high byte of our number 
(FI) on the chart. The box here contains 1241 616961 . Since we 
are now dealing with the high byte, take the value 61696 from that 
box and add it to the value we found earlier for the low byte 123. 

61696 


61819 which is the decimal value of $F17B 

NOTE: to find the decimal value of a two digit number, e.g. 2A, look it 
up in the chart taking the low byte value (42). For a one digit number, e.g. 
E, create a two digit number by adding a leading zero (0E), and similarly 
make three digit numbers four digits with a leading zero. 
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Appendix 3 

Relative Branch and Two’s 
Complement Numbering Tables 

To calculate relative branches, locate the address immediately 
after the location of the branch instruction. Count the number 
of bytes from there to where you want the branch to end up. If 
the destination is before the first byte, use the backward 
branch table and if not, use the forward branch table. Look up 
the displacement(the number you counted) in the body of the 
appropriate chart and read off the high and low digits of the 
branch from the sides. This can also be used in reverse, by 
looking up a branch on the sides to find the displacement taken 
in the body of the chart. 

To convert from a signed decimal number between -128 and 127 to 
a hex two's complement number, find your decimal number in the 
body of the appropriate chart(positives and negatives) and read 
off the hex two's complement number from the sides(high digit, 
low digit). The reverse process (two's complement hex to 
signed decimal) is simply a matter of finding the high digit on 
the column on the left, the low digit on the top row, reading 
off the number where the row and column meet, and if in the 
negative chart make the number negative. 


FORWARD RELATIVE BRANCH POSITIVE NUMBERS 



0 

■ 

2 

3 

« 

5 

6 


8 

9 

A 

B 

c 

0 

E 

E 


,6 

,7 

18 

,9 

20 

2? 

22 6 

23 


25 

26 

27 

28 

29 

30 

2 

* 

2 

2 

!- 

* 

52 

£ 

2 

£ 

£ 

a 

£ 

s 

60 

2 

£ 

£ 

5 

S 



» 

2 

2 

£ 

£ 

£ 

89 

£ 

2 

92 

93 

94 

£ 


,2 

,2 

,2 

,2 



£ 

£ 


£ 

£ 

!a 

is" 
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BACKWARD RELATIVE BRANCH_ NEGATIVE NUMBERS 



° 

» 

2 

3 

A 

5 

8 


8 

9 

A 

B 

C 

D 

E 

E 


£ 

£ 

£ 

!£ 

!£ 

£ 

!£ 

I£ 

£ 

I£ 

!£ 



» 

’98 

W 

8 

2 

9 4 

2 

2 

JLI 

75 

2 

2 


2 

70 

69 

£ 


£ 

65 

° 

£ 

2 

2 

2 

3 

2 

2 

*1 

2 

£ 

£ 

3“ 

36 

£ 

2 

£ 


2 

£ 

2 

2 

J 2 J 

2 

2 

3 

* 


2 


2 

■; 

2 
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Appendix 4 

Atari 130XE Memory Map 
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Appendix 5 
The Screen Chip 


The ATARI'S screen is controlled by two very powerful chips, 
the GTIA and the ANTIC chip. These chips generate background, 
foreground, color information, process shape data, missiles, 
and players. The Antic chip is really a simple programmable 
microprocessor with it's own individual instruction set. The 
GTIA chip handles the generation and movement of players and 
missiles. This chip is controlled primarly by the ANTIC chip. 
It extends in memory from $D000 to $D0FF. GTIA stands for 
George's television interface adapter. Here is a list of the 
memory locations associated with the GTIA chip and the 
functions they perform. 

GTIA Chip 

$0000—$D003 

These registers perform a dual function, they control the 
horizontal position of players 0 to 3 and also indicate with 
what playfield a player has collided. Writing to these 
registers invokes the first function and reading from them the 
second. Poking data into these registers will move a player in 
the horizontal position across the screen. It is possible to 
put any value between 0 and 255 into a register however for the 
player to be visible it must in the range 48 to 208. Otherwise 
it will be under the screen border rendering it invisible. 
These values will alter from television to television.The 
register at $D000 is for player 0 and so on upwards. 

$D004-$D007 

These registers perform an identical task to the ones above 
except that they act on the missiles instead of the players. 
As above, the register at $D004 is for missile zero and so on 
upward. 

$D008-$D00B 

A player can be set to one of three sizes by placing a value in 
these registers. The sizes available are normal, double and 
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quadruple. These size increases are achieved by doubling and 
quadrupling the width of the pixels in the player. Putting a 
zero will set the player to normal size, a one will double his 
size and a three will quadruple it. Reading these registers 
indicates whether a missile to player collision has occurred. 

$D00C 

This register sets the size of all four missiles. A missile is 
two pixels wide and like players can be either normal, double 
or quadruple size. This register contains eight bits and two 
bits are assigned to each missile to set the size. Here is a 
table which explains how to set the various bits in the 
register to expand the missile. 

Missile bits-to-set xl x2 x4 

0 0 & 1 2 1 3 

1 2 & 3 8 A 12 

2 4 & 5 32 16 48 

3 6 & 7 128 64 192 

Reading this register will indicate whether a Player 0 to 
player collision has occurred. 

$D00D-$D010 

Writing to these registers enables the ANTIC chip to be 
effectively bypassed. Normally when a player is displayed on 
the screen the shape data to be displayed is fetched from an 
area of RAM automatically by a process called DMA. This 
process can be switched off and the data fetched from this 
register instead. The limitation is that only one byte of 
shape data can be displayed down the whole length of the 
player. Writing to these registers will control players 0 to 
3. Reading from $D00D to $D00F will determine whether there 
has been a collision between players 1-3 and another player. 
Reading from $D010 will signal whether joystick trigger 0 has 
been pressed. Normally PEEKing from this register will return 
a one but when joystick zero is pressed the location will go to 


$D011 

This location works the same as the one above except that it 
works with missiles and only one register is needed to control 
four missiles. Only bit pairs are assigned to each missile 
because a missile is two bits wide. The bit pairs that go with 
the missiles can be found in the following table: 
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Missile number bit pairs 

0 0 & 1 

1 2 & 3 

2 4 & 5 

3 6 & 7 

Reading this location will give the input at joystick one. As 
with joystick zero normally this location will output a one and 
holding down joystick one will cause it to go to zero. 

$D012-$D015 

These locations control the color and luminances of players 0 
and 1. Normally a missile will be the same color as it's 
associate player. However if the four missiles are merged 
together to form a fifth player they take on their own 
individual color. Reading from location $D014 will determine 
what kind of television system is implemented, PAL or NTSC. If 
the bits 1-3 equal zero then the system is PAL otherwise if the 
bits are 1 then the system is running NTSC. 

$D016-$D019 

These registers set the color and luminace of of playfields 
zero to three. 

$D01A 

This register sets the color and luminance of the background. 
$D01D 

Used to select players, missiles and latch trigger input. Bit 
0 is used to turn on missiles, bit 1 is for players and bit 2 
latches the trigger inputs. By setting this location to zero 
all players and missiles are switched off. 

$D01E 

Writing to this register will clear all collision registers of 
players and missiles. 

$D01F 

Reading from this location will indicate which of the three 
keys OPTION, SELECT and START are being pressed. Normally when 
this location is read a seven is returned but pressing one of 
these keys will switch off a bit. START is bit 0, SELECT is 
bit 1 and OPTION is bit 2. 
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The ANTIC chip 


The screen display is generated by the ANTIC chip which unlike 
conventional video processors is programmable. ANTIC has it's 
own instruction set and it is only necessary to put the program 
in memory and point ANTIC at it. The list of instructions 
which controls the ANTIC chip are called the display list. 
Unlike a full microprocessor however the instruction set is 
extremely simple. The different options are selected by 
setting the right bits in the instruction. There are four 
basic options in the instructions. They are Display list 
Interupts, load memory scan, the vertical and horizontal scroll 
registers. 

A display list interrupt is invoked by setting bit 7 of an 
instruction. When ANTIC comes to execute one of these 
instructions it will cause an interrupt to occur. A load 
memory scan tells ANTIC that the next two bytes following are 
where the text screen memory is positioned. Normally these two 
bytes will hold 40000 in LSB/MSB format. This mode is invoked 
by setting bit 6 of the instruction. Setting bit 5 of an 
instruction will enable fine vertical scrolling and setting bit 
4 will enable fine horizontal scrolling. Setting these two 
bits only enables fine scrolling it doesn't actually cause it. 
Bits 0 to 3 are used to specify the graphics mode wanted. The 
ANTIC modes are functionally identical to BASIC graphics modes 
but just numbered differently. 

Here is the display list that is normally found in BASIC text 
mode 0. 


DECIMAL HEX 


DECIMAL HEX 


112 70 

112 70 

112 70 

66 42 

64 40 

156 9C 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 


2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

2 02 

65 41 

32 20 

156 9C 
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The three 112's at the start of the display list put a border 
at the top of the screen otherwise the screen would be jittery 
or would roll. The 66 tells ANTIC that the two bytes following 
are the address of the screen memory. Normally in graphic mode 
0 the screen is located at 40000 decimal (40000=156*256+64), 
though in actually fact the screen can live any where. Notice 
the bits which are set in the instruction, bit 6 to signify a 
load memory instruction and bit 1 to indicate ANTIC mode 2 or 
BASIC's graphic mode zero. The 23 bytes that follow are all 
twos and indicate that each line is to be in ANTIC mode two, 
which corresponds to BASIC mode 0. It was not necessary to set 
load memory because this had already been done. The 65 told 
ANTIC to jump back to the start of the display list and to use 
the following two bytes as an address. 

There are two kinds of JMP instructions in ANTIC: JMP straight 
to the address specified in the following two bytes and JMP 
when a vertical blank is occurring. A pointer to the display 
list can be found by: 

PRINT PEEK(560)+PEEK(561)*256 
Here is a list of the modes available with ANTIC: 


ANTIC MODE 


9 

10 


13 

14 

15 


BYTES/SCREEN 
960 
760 
960 


240 

240 

480 

960 

1920 

3840 

3840 

7680 

7680 


1 GOLD 

2 ORANGE 

3 RED-ORANGE 


5 PURPLE 

6 RED-ORANGE 

7 BLUE 


9 LIGHT BLUE 

10 TURQUOISE 

11 GREEN-BLUE 


12 GREEN 

13 YELLOW-GREEN 

14 ORANGE-GREEN 

15 LIGHT-ORANGE 


TABLE OF COLOR VALUES 
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Appendix 6 
The Sound Chip 


Sound on the ATARI is generated by a chip called POKEY. This 
chip serves a multitude of other purposes including scanning 
the keyboard, random number seed, communication with serial 
devices and the interrupt source. The POKEY chip lives at 
addresses $D200 to $D2FF. In actual fact only locations $D200 
to $D20F are used, the rest of this page is a set of duplicates 
of the first sixteen bytes. Because the POKEY chip controls 
the disk drive and tape recorder (and all serial bus activity), 
it will need to be initialized after any of these devices are 
used. 


The sound chip has four independant voices. It is possible to 
set the frequency of a note, the volume and the amount of 
noise. The sound chip is selected in machine language by 
storing zero at $D208 and 3 at $D20F. 

There is a frequency register for each of the four voices. It 
is not a frequency register in the conventional sense. Instead 
of loading a frequency into this register, you load a value 
that you want the sound chips input clock frequency divided by. 
So the greater the number, the lower the frequency of the 
voice. So if a four is loaded in one of these registers, then 
for every four ticks of the sound clock a pulse will be output. 
The four frequency registers are located at $D200, $D202, $D204 
and $D206. 

Again for each of the voices there is special control register 
for volume and distortion (noise). These registers can be 
found at locations $D201, $D203, $D205 and $D207. Bits zero to 
four control the volume level of a voice and bits five to seven 
the distortion level. A zero volume is achieved by putting 
zero in the bottom four bits and the loudest volume by putting 
in 15. Adding together the volumes of all the voices must not 
result in a number greater than 32 or there will be buzzing. 

The ATARI does not have distortion in the real sense. 
Distortion in the proper sense is generated by tugging at the 
waveforms in a controlled manner. On the ATARI it's achieved 
by simply removing pulses from the square waveform according to 
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which distortion is chosen. This is really noise. Distortion 
is generated from three special counters called poly-counters. 
Setting the upper three bits in the control registers selects 
the poly-counter to be used. The three poly-counters are four, 
five and seventeen bits long. 

Here is a table of bit values to put in the control registers 
and the poly-counters combinations they will select. An X in 
any of the bit positions means that it is irrelevant what value 
that position takes on. 

BITS 
7 6 5 

0 0 0 -divide input clock by frequency, use 5 bit and 17 bit 
poly-counters and divide by two. 

0X1 -divide input clock by frequency, use 5 bit poly-counter 
and divide by two. 

010 -divide input clock by frequency, use 5 and 4 bit 
poly-counters and divide by two. 

100 -divide input clock by frequency, use 17 bit 
poly-counter and divide by two. 

1X1 -divide input clock by frequency and divide by two. 

110 -divide input clock by frequency, use 4 bit poly-counter 
and divide by two. 

At $D208 there is a control register that works on on all four 
voices. Each of the bits in this location perform a particular 
task. Here is a list of the tasks that each of the bits 


Bit 0 -switches the clock input between 64 KHz and 15 KHz. 

Bit 1 -places a filter into channel two and clock it with voice 


Bit 2 -places a filter into channel one and clock it with voice 
three. 

Bit 3 -fuse frequency registers of voices four and three and 
use as sixteen bit frequency register. 

Bit 4 -fuse frequency registers of voices two and one and use 
as sixteen bit frequency register. 

Bit 5 -use the 1.79 MHz system clock as an input to the sound 
chip on voice three. 
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Bit 6 -use the 1.79 MHz system clock as an input to the sound 

Bit 7 -set the 17 bitpoly-counter to a 9 bit poly-counter. 

This location is very important for controlling the input 
frequencies of the voices. It is possible to set the 
frequencies to 1.79 Mhz (the system clock), 64 KHz and 15 KHz. 
Do this using by changing bits 0, 5 and 6. This greatly 

expands the range of achievable notes. Another method of 
expanding frequency range is to increase the size of the number 
that you divide into the main input frequency. Normally the 
number divided into the frequency is in the range 0-255 but 
this can be expanded to 65535 by changing bits 3 and 4. 
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Appendix 7 

Memory Usage Directory 


PAGE ZERO 

ADDRESS DECIMAL DESCRIPTION 
(HEX) 


0000 0001 0-1 
0002 0003 2-3 

0004 0005 4-5 

0006 6 

0007 7 

0008 8 

0009 9 

000A 000B 10-11 

000C 000D 12-13 

000E 000F 14-15 

0010 16 

0011 17 

0012 0014 18-20 

0015 0016 21-22 

0017 23 

0018 0019 24-25 

001A 001B 26-27 

001C 28 

001D 29 

001E 30 

001F 31 

0020 32 

0021 33 

0022 34 

0023 35 

0024 0025 36-37 

0026 0027 38-39 

0028 0029 40-41 

002A 42 

002B 43 

002C 002D 44-45 

002E 46 

002F 47 

0030 48 

0031 49 

0032 0033 50-51 


Vblank timer value 
Cassette jump vector 
Pointer to disk boot address 
Temporary size of RAM 
Cartridge B insert flag 
Warmstart flag 
Good boot flag 
Disk boot vector 
Init pointer for disk boot 
Pointer to top of memory 
Shadow for POKEY enable 
Break key pressed 0=pressed 
Realtime clock 
Pointer to disk buffer 
CIO command 

Pointer to disk manager 

Pointer to disk utilities 

Printer timeout value 

Points to position in printer buff 

Size of printer line 

Character being output. 

Handler index 

The current device number 

Command byte 

Result of last I/O operation 
Pointer to data buffer 
Pointer to put byte routine 
Count for buffer count 
Type of file access flag 
Used by serial bus routines 
Used by NOTE and POINT 
Byte being accessed in sector 
Temporary storage for char in PUT 
Status of current serial operation 
Checksum for serial bus operation 
Pointer to serial data buffer 
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0034 0035 52-53 

0036 54 

0037 55 

0038 56 

003D 61 

003E 62 

003F 63 

0040 64 

0041 65 

0042 66 

0043 0049 67-73 

004A 74 

004B 75 

004C 76 

004D 77 

0050 0051 80-81 

0052 82 

0053 83 

0054 84 

0055 0056 85-86 

0057 87 

0058 0059 88-89 

005A 90 

005B 005C 91-92 

005D 93 

005E 005F 94-95 

0060 96 

0061 0062 97-98 

0063 99 

0064 0069 100-105 

006A 006B 106 

006B 107 

006C 006D 108-109 

006E 110 

006F 111 

0070 0073 112-115 

0074 007A 116-122 

007B 123 

007C 124 

007D 125 

007E 007F 126-127 

0080 0081 128-129 

0082 0083 130-131 

0084 0085 132-133 

0086 0087 134-135 

0088 0089 136-137 

008A 008B 138-139 

008C 008D 140-141 

008E 008F 142-143 

0090 0091 144-145 


Pointer past previous buffer 
Number of times to retry I/O operation 
Number of device present retries 
Indicates buffer is full, 255=full 

Type of gap between records 
Flag to indicate end of cass file 


Noise flag, used to switch off I/O noisf 
Flag to indicate Time critical I/O 
File manager zero page variables. 

Boot flag for cassette 

Flag to indicate disk and cassette boot 

Color attract flag 
Temporary register 
Left margin of display 
Right margin of display 
Current row number 
Current column number 
Display mode 

Pointer to start of screen memory 
Old cursor row 
Old cursor column 


Value of character under cursor 
Pointer to current cursor position 
Row pointer to DRAWTO point 
Column pointer to DRAWTO point 
Position of cursor in logical line 
Temporary information 
Page number of RAM top 
Character count in screen line 
Pointer to editor getchar routine 
Temporary storage 
Justification counter 
Tempory registers for plotting 
Registers for line drawing 
Split screen flag 

Storage for character from keyboard 
Temporary storage 
Number of points to draw line 
Pointer to start of Basic low memory 
Pointer to variable name list 
Pointer to end of i 


Pointer t 
Pointer t 
Pointer t 


.able date 




start of BASIC program 
currently executing statement 
end of BASIC program 
GOSUB/FOR/NEXT stack 
top of memory used by BASIC 
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0092 00B0 146-202 

00BA 00BB 186-187 
00C3 195 

00C9 201 

00CB 00D1 203-209 

00D2 00D3 210-211 

00D4 00D9 212-217 

00E0 00E5 224-229 

00E6 00F1 230-241 

00F2 242 

00F3 00F4 243-244 

00F5 00FF 245-255 


Used by BASIC ROM 

Linenumber where program stopped 
Error number of last error 
Number of spaces between TAB columns 
Spare bytes in zero page 
Temporary location for calculations 
Zero page,floating point accumulator 0 
Second floating point accumulator 
More floating point information 
Index to character input buffer 
Pointer line input buffer 
Temporary floating point registers 


PAGE ONE 

0100 01FF 256-511 System stack 
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Appendix 8 

Table of Screen Codes 


NORMAL VIDEO 


FOR TYPE 

FOR TYPE 

FOR TYPE 

FOR TYPE 

THIS THIS 

THIS THIS 

THIS THIS 

THIS THIS 

[¥] CTRL , 

fcj CTRL J 

|#1 CTRL T 

[§ ESC CTRL + 

[►] CTRL A 

[~j] CTRL K. 

61 CTRL U 

y ESC CTRL * 

[~| CTRL B 

[j~| CTRL L 

[f1 CTRL V 

[+] CTRL . 

PH CTRL C 

["] CTRL M 

y CTRL W 

CTRL ; 

[ij~| CTRL D 

[J CTRL N 

[*] CTRL X 

| SHIFT = 

[■j] CTRL E 

[||~| CTRL 0 

[j~| CTRL Y 

m ESC 

1 —‘ SHIFT 

25 CTRL F 

[$] CTRL P 

CTRL Z 

CLEAR 

[S] CTRL G 

[ r\ CTRL Q 

[ffc] ESC ESC 

[4l ESC DELETE 

\jj\ CTRL H 

Q CTRL R 

PR ESC CTRL - 

[F| ESC TAB 

[~i1 CTRL I 

gjj CTRL S 

[»jp| ESC CTRL = 
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INVERSE VIDEO 







Appendix 9 
Current Key Pressed 


Location 754 stores the last key pressed. Only one key may be 
pressed at a time and if two are pressed then the first one hit 
will register. This location holds the value of the hardware 
register read and not the actual ASCII value of the key 
pressed. This memory location is a shadow location. The value 
of the last key pressed will remain at this location until it 
is cleared by a POKE or another key is pressed. Here is a 
table of the values returned by PEEKing this location. 


Key Value Key Value 


Key Value Key Value 


ESC 28 

1 31 

2 30 

3 26 

4 24 

5 29 

6 27 

7 51 

8 53 

9 48 

0 50 

( 54 

) 55 

Bk sp 52 


TAB 44 

Q 47 

W 46 

E 42 

R 40 

T 45 

Y 43 

U 11 

I 13 

0 8 

P 10 


RETURN 12 


CTRL NOTHING SHIFT NOTHING 
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Appendix 10 
ALPA + Disassembler 


10 GLR :GOSUB 1000 
12 GOSUB 12000 

20 GOSUB 1700:IF NL=1 THEN RETURN 

30 PAS*1:FOR Zl-1 TO NL-1:GOSUB 2000:GOSUB 2500:GOSUB 3000:GO 
SUB 4000 

70 IF TYPE-1 THEN GOSUB 5000 
80 IF TYPE-2 THEN GOSUB 3500 
90 GOSUB 7000:GOSUB 7500:NEXT Z1 
200 REM PASS 2 
205 NC-1 

210 PAS-2:FOR Zl-1 TO NL-1:GOSUB 2000:GOSUB 2500:GOSUB 4000 

225 IF TYPE-1 THEN GOSUB 5000 

230 IF TYPE-2 THEN GOSUB 3500 

235 GOSUB 7000:NEXT Z1 

240 GOSUB 7600:RETURN 

1000 REM INIT SYSTEM 

1010 DIM LINE*(80),CODE*(3),INFOS*(20),0PER*(15>,CHAR*(1>,H*<16 
) ,HZ* < 4) ,EN1(100) ,ST1(100) 

1012 DIM TEXT*(1000),PU*(40),MAND*(18),M0R*(18),A*(3),OTABLE*(B 
45),VA*(9),HX*(2),CH*(1),MEM*(6),DIRE*(12) 

1015 OSIZE—15:NDIR-4:FG-100 

1020 DIM HEX* C2) ,SYS*(10) ,SYMBOL*(220) ,LABEL*(10) ,LVALUE*(4) ,ME 
M (FG) 

1030 H*-"0123456789ABCDEF" 

1035 NL-1:EPOIN=1:SYMBOL*(1,1)-CHR*(0) 

1037 DIRE*—"DFBDFWEQUORG" 

1045 POIN-1s ST—1 
1050 NMODE—11:FR—1 

1060 INFOS*-" ^ ^ ^ ^ ^ ^ ^ ^ ^ " 

1500 DATA 104,104,133,213,104,133,212 
1510 DATA 104,37,213,133,213,104,37,212,133,212,96 
1530 FOR 1-1 TO 18:READ A:MAND*(I,I)-CHR*(A):NEXT I 
i540 MOR*=MAND*:MOR*(9,9)-CHR*(5):MOR*(14,14)-CHR*(5) 

1550 OTABLE*-" A ":OTABLE*(840)="^":OTABLE*(2,840)-OTABLE*(1,840- 

1600 READ NOPS 

1610 FOR 1-1 TO 840 STEP OSIZE 

1630 READ A*,ADDR,N:Ml-1NT(ADDR/256) : Ll-ADDR-(Ml*256) 

1650 OTABLE* (1,14-2) -A*: OTABLE* (14-3,14-3) -CHR* (LI): OTABLE* (14-4,14- 
4)-CHR*(Ml) 

1690 FOR J = 1 TO N: READ A: OTABLE* (I-t-44-J , I+4+J )-CHR* (A) : NEXT J : NE 
XT I 

1699 RETURN 

1700 REM INIT ASSEMBLER 

1705 ST-1:PC-0:EPOIN—1:SYMBOL*(1,1)-CHR*(0):V-0:NC—1:SYSL-0 
1710 FOR 1=0 TO FG:MEM(I)—0:NEXT I 
1999 RETURN 


139 





4045 IF CODES'”DIRE-fc (1,1 +2) THEN TYPE=2:RETURN 
4047 NEXT I 

4050 PRINT " UNKNOWN ^OPER AT I ON ^CODE":ERR= Is RETURN 
5000 REM PROCESS OPERAND 

5005 IF FLAG=1 THEN V=2:PG=PC:BOSUB 6600 
5010 IF LEW (LINES:) < 16 THEN MQDE=1:RETURN 
5015 OPERS ; =L I NE$ <16, LEN (LINES - -) ) :OP=LEN(OPER*> 

5020 CHAR*=OPER$(1,1) 

5025 IF CHAR*="(" THEN GOSUB 5100:RETURN 
5030 IF CHAR*="tt M THEN GOSUB 5200:RETURN 
5035 IF CHAR*="S'-" THEN GOSUB 5300: RETURN 
5037 IF CHAR*="?•<" THEN GOSUB 5400:RETURN 

5040 A=ASC(CHAR*):IF a>=65 AND A<=90 THEN GOSUB 5500-.RETURN 

5095 GOSUB 6030:RETURN 

5100 REM PROCESS INDIRECTION 

5105 CC=2:GOSUB 5700 

5107 IF CH*="$" THEN GOSUB 5150:RETURN 

5108 A=ASC(CH$):IF A>=65 AND A<=90 THEN GOSUB 5600:RETURN 
5110 GOSUB 6000:RETURN 

5150 REM PROCESS HEX INDIRECTION 

5151 COUNT =1 

5152 GOSUB 5700: IF TR=1 THEN MEM*(COUNT,COUNT)=CH*:COUNT=COUNT+ 
1r GOTO 5152 

5153 COUNT=COUNT—1 

5154 IF CH*=" , " THEN GOSUB 5160-.RETURN 

5156 IF CH*=" > " THEN GOSUB 5170: RETURN 

5157 GOSUB 6000:RETURN 

5160 REM PROCESS INDIRECTION X 

5161 IF C0UNTO2 THEN GOSUB 6000: RETURN 

5162 GOSUB 5700: IF CHSO-X" THEN GOSUB 6000: RETURN 

5163 GOSUB 5700:IF CH*<>">" THEN GOSUB 6000:RETURN 

5164 M0DE=512:RETURN 

5170 REM INDIRECT,Y OR (INDIRECT) 

5171 IF C0UNT=4 THEN GOSUB 5180:RETURN 

5172 IF C0UNT=2 THEN GOSUB 5190:RETURN 

5173 GOSUB 6010:RETURN 

5180 REM PROCESS ABSOLUTE INDIRECTION 

5181 GOSUB 5700:IF CH*= M " THEN MODE=1024:RETURN 

5182 GOSUB 6000:RETURN 

5190 REM PROCESS INDIRECT,Y 

5191 GOSUB 5700:IF CH*<>"THEN GOSUB 6000:RETURN 

5192 GOSUB 5700:IF CH*<>"Y" THEN GOSUB 6000:RETURN 

5193 GOSUB 5700:IF CH*<>"" THEN GOSUB 6000:RETURN 

5194 M0DE=256:RETURN 

5200 REM PROCESS IMMEDIATE DATA 

5205 M0DE=2 

5215 CHAR*=OPER*(2,2) 

5220 IF CHAR*="*" THEN GOSUB 5250:RETURN 
5225 GOSUB 6010:RETURN 
5250 REM PROCESS IMMEDIATE HEX DATA 
5255 HX*=QPER*(3,LEN(0PER*)) 

5260 IF LEN(HX*>>2 THEN GOSUB 6010:RETURN 

5261 IF LEN(HX*)<2 THEN HX*(2,2)=HX*(1,1):HX*(1,1)="0":GOSUB 90 
00:IMM=DEC:RETURN 

5265 GOSUB 9000:IMM=DEC:RETURN 
5300 REM GENERATE HEX MEMORY OBJECT 
5305 CC=2:COUNT=1 

5310 GOSUB 5700:IF TR=1 THEN MEM$(COUNT,COUNT)=CH^:COUNT=COUNT+ 
1:GOTO 5310 
5315 COUNT=COUNT-1 

5317 IF CH*="," THEN GOSUB 5750:RETURN 
5319 IF CH*="" THEN GOSUB 5800:RETURN 
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5321 PRINT " ILLEGAL ..CHARACTER ..IN .OPERAND" : ERR=l: RETURN 

5400 REM RELATIVE BRANCH 

5401 CtfAR*»0PER*(2,2) 

5402 IF CHAR*-"*" THEN GOSUB 5410:RETURN 

5404 IF CHAR*>="A" AND CHAR*<—"Z" THEN BOSUB 5450:RETURN 
5406 GDSUB 6070:RETURN 
5410 REM PROCESS HEX LABEL 
5412 CC—3:COUNT—1 

5414 GOSUB 5700:IF TR=1 THEN MEM*(COUNT,COUNT)-CH*:COUNT-COUNT+ 

1:GOTO 5414 

5415 COUNT“COUNT—1 

5416 IF CH*<>"" THEN GOSUB 6010:RETURN 
54 IP MODE-2048: RETURN 

5450 REM RELATIVE LABEL 

5451 LABEL*(1,1)-CHAR*:LSIZE=2:CC=3 

5453 GOSUB 6800:IF TR=1 THEN LABEL*(LSIZE,LSIZE)-CH*:LSIZE-LSIZ 
E+l:GOTO 5453 

5455 LSIZE-LSI ZE-1:GOSUB 6700 

5457 IF FOUND=l THEN MEM*=LVALUE*:GOSUB 5416:RETURN 

5459 IF PAS-2 THEN GOSUB 6085: RETURN 

5460 MEM*="0000":C0UNT=4:GOSUB 5416:RETURN 

5499 RETURN 

5500 REM PROCESS LABEL IN OPERAND 

5501 LABEL*(1,1)-CHAR*:LSIZE=2:CC-2 

5503 GOSUB 6800:IF TR=1 THEN LABEL*(LSIZE,LSIZE)-CH*:LSIZE-LSIZ 
E+l:GOTO 5503 

5505 LSIZE—LSIZE—1:GOSUB 6700 

5515 IF FOUND=l THEN MEM*=LVALUE*: GOSUB 5317:RETURN 

5519 IF PAS=2 THEN GOSUB 6085:RETURN 

5520 MEM*-"0000":COUNT=4:GOSUB 5317:RETURN 

5600 REM LABEL INDIRECTION 

5601 LABEL*(1,1)=CH*:LSIZE=2:CC=3 

5603 GOSUB 6800:IF TR-1 THEN LABEL*(LSIZE,LSIZE)=CH*:LSIZE=LSIZ 
E+l:GOTO 5603 

5605 LSIZE—LSIZE—1:GOSUB 6700 

5610 IF FOUND=l THEN MEM*=LVALUE*:GOSUB 5154:RETURN 
5612 IF PAS=2 THEN GOSUB 6085:RETURN 
5615 MEM*="00":CGUNT=2:GOSUB 5154:RETURN 

5700 REM GET CHAR FROM OPERAND 
5705 TR—0:CH*—"" 

5710 IF COOP THEN RETURN 

5715 CH*=OPER*(CC,CC):CC-CC+1:A=ASC(CH*) 

5720 IF A>-65 AND A<=70 THEN TR=1:RETURN 
5730 IF A>=48 AND A<=57 THEN TR=1:RETURN 
5735 RETURN 

5750 REM PROCESS AN INDEX REGISTER 
5755 GOSUB 5700 

5760 IF CH*="X" THEN GOSUB 5780:RETURN 
5765 IF CH*-"Y" THEN GOSUB 5790:RETURN 

5770 PR I NT "I LLEGAL „ INDEX .REGISTER .FOLLOW ING ..VALUE " : ERR= 1: RETUR 

5780 REM DETERMINE IF ZERO/ABSOLUTE X 
5785 IF COUNT-2 THEN MODE=B:RETURN 
57B7 IF COUNT—4 THEN MODE—64:RETURN 
5709 GOSUB 6010:RETURN 
5790 REM DETERMINE IF ZERO/ABSOLUTE Y 
5795 IF COUNT-2 THEN MODE-16:RETURN 
5797 IF COUNT-4 THEN MODE-128:RETURN 

5799 GOSUB 6010:RETURN 

5800 REM DO ABSOLUTE OR ZERO PAGE HEX 
5805 IF■COUNT-2 THEN MODE-4:RETURN 
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5810 

5815 

6000 

6005 

6020 

6030 

6070 

6080 

6085 

6418 

6500 


IF C0UNT®4 THEN M0DE=32:RETURN 

GOSUB 6010:RETURN 

REM PRINT ERROR MESSAGES 

PR I NT "I LLEGAL A INDIRECT *.1NSTRUCTI ON " : ERR® 1: RETURN 
PR I NT "I LLEGAL ^HE XI DEC IM AL A VALUE " : ERR= 1: RETURN 
PRINT "BRANCH ^.OUT A OF ^RANGE" sERR=1 s RETURN 
PR I NT "I LLEGAL ^ADDRESS ING ^MODE ^WITH A I NSTRUCT I ON " : I 
URN 

PR I NT " I LLEGAL ^OPERAND " : ERR= 1: RETURN 

PR I NT " MULT I PL Y A DEFI NED A L ABEL " s ERR® 1: RETURN 

PRINT "UNKNOWN ^SYMBOL":ERR®1s RETURN 

IF C0UNTO4 THEN GOSUB 6010: RETURN 

REM 


! RET 


6510 IF COLE THEN RETURN 
6515 CH*=LINE*(CC,CC):CC=CC+1:RETURN 

6600 REM CHECK IF LABEL IN SYMBOL TABLE AND IF NOT ADD TO IT 

6601 LSIZE®SYSL:LABEL*®SYS*:GOSUB 6700:IF FOUND®1 THEN GOSUB 60 
80:RETURN 

6605 SYMBOL*(EPOIN,EPOIN)=CHR* ( SYSL):EPOIN=EPOIN+1 
6610 COUNT®1 

6615 FOR I=EPOIN TO EPOIN+SYSL-1 

6617 SYMBOL*(1,1)®SYS*< COUNT,COUNT) 

6618 COUNT®COUNT +1:NEXT I 

6620 EPO I N=EPO IN+SYSL: SYMBOL* (EPO IN, EPO IN) =CHR* (V) : EPO I N=EPO IN+ 


6622 MSB®INT(PG/256):LSB®PG-(MSB*256) 

6624 SYMBOL*(EPOIN,EPOIN)=CHR*(LSB):EPOIN=EPOIN+1 
6626 SYMBOL* (EPO IN, EPO IN) =CHR* (MSB) : EPO IN=EF*0IN+1: SYMBOL* (EPO IN 
,EPOIN)=CHR*(0):RETURN 

6700 REM SEARCH SYMBOL TABLE 

6701 SPOIN®1:FOUND=0 

6705 A*=SYMBOL*(SPOIN,SPOIN):A®ASC(A*):IF A=0 THEN RETURN 
6710 IF AOLSIZE THEN SPOIN=SPOIN+A+4: GOTO 6705 
6715 S A=SPO IN: SPO I N=SF‘0 IN+1: COUNT® 1 
6720 FOR I=SF*OIN TO SPOIN+A-1 

6725 IF L. ABEL* (COUNT, COUNT )<>SYMBOL*< I, I) THEN SPO I N=SA+A+4: GO T 
6730 COUNT=COUNT +1:NEXT I 

6735 SPOIN®SA+A+1:FOUND®1:LSI=ASC(SYMBOL*(SPOIN,SPOIN)) 

6740 IF LSI=2 THEN GOSUB 6770:C0UNT®4:RETURN 
6745 IF L51'®1 THEN GOSUB 6780: C01JNT®2: RETURN 
6750 RETURN 

6770 SPOIN=SPOIN+1:BYTE®ASC(SYMBOL*(SPOIN,SPOIN)):PM=BYTE:GOSUB 
9200:LVALUE*(3,4)®HX* 

6775 SPO I N=SF'0 IN+1: BYTE® ASC (SYMBOL* (SPO IN, SPO IN)): PM®PM+ (BYTE*2 
56):GOSUB 9200:LVALUE*(1,2)=HX*:RETURN 
6780 SPOIN®SPOIN+1:BYTE®ASC(SYMBOL*(SPOIN,SPOIN)):PM-BYTE:GOSUB 
9200:LVALUE*(1,2)=HX*:RETURN 
6800 REM GET CHAR FROM OPERAND 
6B05 TR®0:CH*® "" 

6810 IF COOP THEN RETURN 

6815 CH*=OPER*(CC,CC):CC®CC+1:A®ASC(CH*) 

6820 IF A>®65 AND A<=90 THEN TR®it RETURN 
6825 RETURN 

7000 REM GENERATE OBJECT CODE 

7001 IF ERR®1 THEN RETURN 

7002 IF TYPE=2 THEN RETURN 

7005 ADDR®ASC(INFOS*(4,4))+(ASC(INFOS*(5,5))*256) 

7010 A®USR(ADR(MAND*) ,ADDR,MODE):IF A=0 THEN GOSUB 60301 RETURN 
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7020 

7025 


7045 

7050 

7055 

7060 

7065 

7070 

7075 

7080 

7085 

7090 

7095 

7099 

7500 

7501 
7505 
7600 


7610 

7615 

7620 

7625 

7630 

7635 

7640 

7645 

7650 

7655 

7660 

8050 

8055 

8065 

8070 

8100 

8105 

8110 

8115 

8120 

8125 

8150 

8155 

8160 

8165 


CC1UNT=0 

FOR 1=0 TO NMODE 

A=USR(ADR(MAND*) , ADDR , 2' % I) ! IF A< >0 THEN C0UNT=C0UNT+1 
A=USR (ADR (MAND*) , MODE, 2' S I) : IF A< >0 THEN GOTO 7040 
NEXT I 

OBJECT=ASC(INFOS* <5+COUNT,5+COUNT)) 

IF MODE= 1 THEN GOSIJB 8050: RETURN 
IF M0DE=2 THEN GOSUB 8100:RETURN 
IF MQDE=4 THEN GOSUB 8150:RETURN 
IF liODE=8 THEN GOSUB 8150: RETURN 
IF MODE-16 THEN GOSUB 8.150: RETURN 
IF M0DE=32 THEN GOSUB 8300:RETURN 
IF M0DE=64 THEN GOSUB 8300:RETURN 
IF MODE”128 THEN GOSUB 8300:RETURN 
IF M0DE=256 THEN GOSUB 8500:RETURN 
IF M0DE=512 THEN GOSUB 8500:RETURN 
IF MODE=.l024 THEN GOSUB 8300: RETURN 
IF MODE=2048 THEN GOSUB 8600:RETURN 
RETURN 

REM PRINT OUT THE LINE 
IF ERR=1 THEN RETURN 
PRINT PUT:RETURN 
REM PRINT OUT SYMBOL TABLE 
PRINT : PR I NT " SYMBOL ^.T ABLE " 

SP0IN=1 

A*=SYMB0L*(5P0IN,SP0IN):A=ASC(A*) : IF A=0 THEN RETURN 

SPOI N=SPO IN+1: LABEL*= " A A **.**. * s C0= 1 

FOR I=SPOIN TO SPOIN+A-1 

LABEL* (CO, CO) =SYMBOL* (1,1): CO=CO+1 

NEXT I 

SPO I N=SF'01N+A+1 

Li=ASC(SYMBOL*(SPOIN,SFOIN)):SPOIN=SPOIN+1 
M1=ASC(SYMBOL*(SPOIN,SPOIN)):SPOIN=SPOIN+1 
PRINT LABEL*;" 

BYTE=M1:GOSUB 9200:PRINT HX*; 

BYTE=L1:GOSUB 9200:PRINT HX*:GOTO 7610 

REM GENERATE IMPLIED OBJECT 

GOSUB 9100:MEM(NC)=0BJECT 

NC=NC+1:PC=PC+1 

BYTE=OBJECT:GOSUB 9200 

PU*(6,7)=HX*:GOSUB 9300:RETURN 

REM GENERATE IMMEDIATE OBJ CODE 

GOSUB 9100:MEM(NC)=OBJECT 

NC=NC+1:MEM(NC)=IMM:NC=NC+1 

BYTE=OBJECT:GOSUB 9200:PC=PC+2 

PU*(6,7)=HX*:BYTE=IMM:GOSUB 9200 

PU*(9,10)—HX*:GOSUB 9300:RETURN 

REM GENERATE OBJECT FROM ZERO 

GOSUB 9100:MEM(NC)=0BJECT:NC=NC+1 

BYTE=OBJECT:GOSUB 9200 

PU*(6,7)=HX*:PU*(9,10)=MEM*:NC=NC+1:GOSUB 9300:PC=PC+2:RET 


8300 REM PROCESS ABSOLUTE 
8305 GOSUB 9100:MEM(NC)=0BJ ECT 

8310 NC=NC,+ 1 : BYTE=0BJECT: GOSUB 9200: PU* (6,7) =HX* 

8315 HX*=MEM*(3,4):PU*(9,10)=HX*:GOSUB 9000:MEM(NC)=DEC:NC=NC+1 
8317 HX*=MEM*(1,2):PU*(12,13)=HX*:GOSUB 9000:MEM(NC)=DEC:NC=NC+ 
1:PC=PC+3 

8319 GOSUB 9300:RETURN 
8500 REM INDIRECT,Y 

8505 GOSUB 9100:MEM(NC)=OBJECT:NC=NC+1 
8510 HX*=MEM*(1,2):GOSUB 9000:MEM(NC)=DEC 
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11005 PRINT NL; " ► 
11010 IF C0UNT=1 1 
11015 JJ=1:C0UNT=C 
11020 ST1<NL>”FR:I 
11025 FOR I=FR TO 


FR+COUNT-1:TEXT*(1,1)=LINE*(JJ,JJ) 


11030 EN1(NL)=FR+COUNT-l:FR=FR+COUNT:NL=NL+1:SOTO 11005 
11100 REM LIST 


11105 INPUT FI, F2 

11106 IF F2>=NL THEN F2=NL-1 


11110 FOR 1=1 TO NL 

11115 IF I>=F1 AND I<=F2 THEN GOSUB 11125 

11120 NEXT I:RETURN 

11125 ST1=ST1(I):EN1-EN1(I) 

11130 PRINT I; " : FOR J=ST1 TO EN1: PRINT TEXT* (J , J ) ;s NEXT J:PRI 

NT :RETURN 
11160 GOTO 11520 
11200 REM DELETE 
11205 INPUT FI 

11210 IF F1>NL—1 • OR F1<1 THEN RETURN 
112.15 IF F1--=NL-1 THEN NL=NL-1: RETURN 
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11300 REM INSERT 

11305 INPUT FI 

11306 IF•F1>=NL THEN RETURN 
11310 F1=F1+1 

11315 PRINT FIs":GOSUB 9801 
11325 IF COUNT = 1 THEN RETURN 
11330 COUNT=COUNT-l:ST1=FR:JJ=1 

11335 FOR I=FR TO FR+COUNT-1sTEXT*(I,I)=LINET(jJ,JJ)sJJ=JJ+lsNEX 

1.1340 ENl=FR+COUNT-l 

11345 J=NL-Fl:SO=NL-l:LINK=NL 

11350 FOR 1 = 1 TO J 

11355 A=ST1(SO):ST1(LINK)=A:A=EN1(SO) :EN1(LINK)=A:SO=SO-lsLINK=L 
INK—1s NEXT I 

11360 EN1(F1> =EN1:ST1(F1)=ST1:FR=FR+COUNT:NL=NL+1s GOTO 11310 

11400 REM SAVE 

11405 IF NL=1 THEN RETURN 

11407 QPERT=“":INPUT OPERT:IF OPERT="" THEN RETURN 
11410 OPEN 4)2,8,0,OPERT:AT=" 

11415 FOR 1=1 TO NL-1 
11420 EN1-EN1(I)sSTl=STl(I) 

11425 FOR J=ST 1 TO EN1:A*=TEXTT(J,J) 

11430 PRINT 4)2; AT: PRINT A*; 

11450 NEXT J 

11455 PRINT 4)2:" H” SPRINT 
11460 NEXT I:CLOSE 442: RETURN 
11500 REM LOAD 

11505 QPERT="": INPUT OPERT: IF OPERT="" THEN RETURN 
11510 OPEN 4)2,4,0, OPERT 
11512 TRAP 11570 
11515 FR=lsSTl=FRs1=1 

11520 STl=FR:COUNT=l:LINET=" + " 

11525 AT=" s INPUT 4)28 AT: IF AT="|-" THEN PRINT s SOTO 11540 
11530 LINET(COUNT,COUNT)=AT8 PRINT AT; 

11535 COUNT=COUNT+1s GOTO 11525 
11540 COUNT=COUNT-l 
11545 ENl=FR+COUNT-l 

11550 JJ = 18 FOR J=FR TO FR+COUNT-18 TEXT*(J,J)=LINET(JJ,JJ):JJ=JJ+ 
Is NEXT .1 

11555 ST 1 (I)=ST1s EN1(I)=ENls1 = 1 + 18FR=FR+COUNT 

11560 SOTO 11520 

11570 NL=I s CLOSE 4)28 RETURN 

12000 REM COMMAND MODE 

12005 CLOSE 441; OPEN 4) 1 ,12,0, "Es " 

12006 SETCOLOR 1;0,15:SETCOLOR 4,0,0:SETCOLOR 2,0,0sPOKE 82,0sPR 
INT 

12007 POKE 676,16s POKE 675,8 s POKE 677,16 
12010 LINET=" *."bPRINT "*^";:GOSUB 9801 
12020 IF LI NET-"ASM" THEN SOSUB 20 s GOTO 12010 
12030 IF L.INET=" APPEND" THEN GOSUB 11000: GOTO 12010 
12040 IF LI.NET="LIST" THEN GOSUB 11100SGOTO 12010 
12050 IF LINET="WATCH" THEN GOSUB 13000:GOTO 12010 
12055 IF • l_ I NET=" NW ATCH " THEN WA=0:GOTO 12010 

12060 IF LINET="QUIT" THEN PRINT CHRT(125)s8 END 
12065 IF LINET="NEW" THEN FR=1: NL=1: GOTO 12010 
12070 IF LINET="DELETE" THEN GOSUB U200SGOTO 12010 
12075 IF LINET="INSERT" THEN GOSUB 11300:GOTO 12010 
12080 IF LINET="RUN" THEN GOSUB 13500:GOTO 12010 
12085 IF LINET=“SAVE" THEN GOSUB 11400:GOTO 12010 
12087 IF LINET="LOAD" THEN GOSUB 11500:GOTO 12010 
12099 GOTO 12010 
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13000 REM WATCH 

13010 PRINT " (WHAT ^.ADDRESS *.) "5 
13015 INPUT HZ* 

13020 IF LEN (HZ*) < >4 THEN PRINT "ADDRESS ...MUST ^BE ^FOUR ^DIGITS ^LON 
G":RETURN 

13030 HX$=HZ*<1,2):GOSUB 9000:M1=DEC 
13035 HX*=HZ*(3,4>:GOSUB 9000:Lt=DEC 
13040 WAT= < M1 *256 > +L1: WA= 1:RETURN 
13500 REM RUN 
13510 JJ=F'C1 

13515 FOR 1=1 TO NC-1:BYTE=MEM(I)!POKE JJ,BYTE:JJ=JJ+1:NEXT I 
13520 IF WA=1 THEN BYTE=PEEK(WAT):GOSUB 9200:F'RINT "ADDRESS ; HZ 
*; " i.BEFORE="; HX* 

13530 A=USR(PCI) 

13540 IF WA=1 THEN BYTE=PEEK(WAT):GOSUB 9200:PRINT "ADDRESS ; HZ 
*; " ^.AFTER *=" ; HX* 

13550 RETURN 
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